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ABSTRACT 


Abstract of a Report to the Graduate Committee of 
the Department of Civil Engineering in Partial 
Fulfillment of the Requirements for the Degree of 
Master of Engineering. 


COMPUTER AIDED DESIGN OF SOLDIER PILE AND LAGGING 
RETAINING WALLS WITH TIEBACK ANCHORS 
B y 
KEVIN J. D'AMANDA 
FALL 1991 
Chairman: Dr. Frank C. Townsend 
Major Department: Civil Engineering 
Soldier pile and lagging walls are used to support 
open excavations and restrict lateral movements. They 
also provide an increased factor of safety to nearby 
structures and utilities against excessive deformations 
and loss of bearing capacity. The soldier pile and 
lagging wall consists of structure H-beams driven into 
the ground with wood lagging installed between the 
flanges of the beams to retain the soil. With the use 
of tieback anchors as bracing, they can provide an 
unobstructed area for construction. 
The design of the soldier pile and lagging wall 
consists of developing a pressure envelope for the soil 


conditions and determining the number and location of 





the anchors for a given H-beam's section modulus. The 
pressure envelopes for braced excavations differ from 
Rankine's active state. A braced excavation deforms 
more laterally at the bottom of the excavation than the 
top due to the installation of the anchors. Peck 
(1969) developed pressure envelopes for braced 
excavations which can be used for the design of a 
retaining wall. 

A C++ language computer program was developed to 
optimize the design of the soldier pile and lagging 
wall. The pressure diagrams for sand and clays 
developed by Peck and tieback anchor capacity curves 
from the Federal Highway Administration were used in 
the program. Also referenced was Naval Facilities 
Engineering Command, Design Manual 7.2, for flexible 
wall design. By varying the number and location of the 
tieback anchors, the wall design may be optimized for 


given soil conditions and wall requirements. 


xi 
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CHAPTER ONE 


INTRODUCTION 


1.1 Background 


Soldier pile and lagging retaining walls with 
tieback anchors are used to support open construction 
excavations and restrict lateral movements of the 
surrounding soil. The wall provides a factor of safety 
to nearby structures against any loss of bearing 
capacity as the result of lateral movements. With the 
use of tieback anchors, an unobstructed excavation for 
construction can be provided. Figure 1.1 illustrates a 
typical soldier pile and lagging wall with tieback 
anchors. The basic design of the system is as follows: 

a. Determine the given boundary conditions 
indicating soil stratification, water level, slope of 
the soil behind the wall, and surcharge loads. 

b. Compute the lateral earth pressure diagrams 
for the braced excavation including any pressure 
diagrams from surcharge loads. 

c. Design the components, which include the 
soldier pile; wale; tiebacks; and lagging, based on the 


pressure diagrams. 





The pressures diagrams for braced cuts differ 
from lateral earth pressures obtained by Coulomb's or 
Rankine's theory. Peck (1969) derived lateral earth 
pressure diagrams for braced cuts in sands and clays 
which can be used to calculate the maximum moment and 


reaction forces for the design of the retaining wall 


system. 
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Figure 1.1 


Tieback Soldier Pile and Lagging Wall for 
a Cut-and-Cover Station in Philadelphia 
(FHWA/RD-82/047, 1982) 





The basic concept of bracing an excavation is 
based on the excavation causing the removal of a mass 
of soil and water from a site. The ground water table 
may also be lowered outside and below the excavation to 
accomplish the construction. Consequently, these 
actions will result in a total stress release and 
movements in the surrounding soil. A retaining wall is 
typically installed to control these movements. 
Satisfactory performance of the wall requires that the 
excavation periphery not have any excessive movements 
or deformations. Moreover, deformations of the 
surrounding soil may be limited so that adjacent 
structures and utilities are not adversely affected. 
The factors that influence deformations include the 
dimensions of the excavation, soil properties, ground 
water control, time (time excavation open, time a 
section is unbraced, etc.), support system, excavation 
and bracing sequence, near-by structures and utilities, 
and transient surcharge loads. (Lambe and Turner, 


1970) 


1.2 Computer Program Requirements 


The design of soldier pile and lagging retaining 


walls requires the determination of the number and 





location of tieback anchors for a given section modulus 
of a soldier pile to ensure the pile is not 
overstressed. This computer program was developed to 
calculate the maximum moment of a soldier pile, depth 
of embedment, and reaction forces based on the soil 
conditions, depth of the excavation, and location of 
the tieback anchors. By varying the location and 
number of the anchors, the design of the soldier pile 
wall may be optimized. 

The computer program will also calculate the 
required anchor capacities, bonded and unbonded 
length of the tieback anchors, and the section 
modulus of the wale system based on anchor spacing 
and soil type. Tieback capacity and length is based 
on pressure injected tiebacks in cohesionless soils 


and post-grouted tieback anchors in cohesive soils. 


1.3 Computer Language 

The computer program was written and compiled in 
Borland Turbo C++. C was originally developed in the 
1970's for use with the UNIX operating system. The 
definition of C was first presented in The C 
Programming Language, First Edition by Brain W. 


Kernighan and Dennis M. Ritchie in 1978. The 





American National Standards Institute (ANSI) 
developed a new standard for the language five years 
later which resolved ambiguities in it (Turbo C++ 
Users Guide, 1991). Turbo C++ implements the latest 
ANSI standard for C. It is manufactured and a 


registered trademark of Borland International, Inc. 





CHAPTER TWO 


BRACED EXCAVATIONS AND TIEBACKS 


2.1 Braced Excavations 

Braced excavation retaining walls are used to 
support the sides of temporary excavations in various 
construction applications. The vertical face of the 
cut is held open by the retaining structure until a 
permanent structure can be installed. The permanent 
structure may include the basement of a building, walls 
of a parking garage, or underground facilities. The 
braced structure restricts the inward movement of the 
surrounding soil preventing settlement, collapse of the 
excavation, and possible bearing capacity failure of 
nearby structures. Table 2.1 lists the factors to be 
considered in designing a braced excavation. The most 
common methods of supporting a temporary excavation are 
sheetpile walls, drilled-in-place concrete piles, 
slurry walls, and soldier pile and lagging. 

Sheetpiles are driven into the ground prior to 
excavation, interlocked forming a wall, and then the 
soil excavated. They may be supported by struts or 
anchors as required. Drilled-in-place piles may be 


used with a spacing so that lagging is not required. 





Table 2.1 
Steps in Engineering an Excavation 
(Lambe and Turner, 1970) 


Explore and test 
subsoil. 


Select dimensions of Structure size and 
excavation. grade requirements, 
depth to good soil, 
depth to meet stab- 


ility requirements. 


Survey adjacent Size, type, age, 
structures and location, and 
utilities. condition. 


Establish permiss- 
ible movements. 













m W 2 
٣ 












Select bracing and 
construction 
sequence. 


Local experience, 
cost, time avail- 
able, type of wall, 
depth of wall, type 
and spacing of 
bracing, and de- 
watering sequence. 










Predict movements 
caused by excavation 
and dewatering. 










Compare predicted 
with permissible 
movements. 





Alter bracing and 
construction scheme, 
if needed. 


Monitor construction 
and alter bracing 
and construction as 
required. 





Arching of the soil from the lateral pressures 
developed by the pile will retain the soil across the 
open spacing (Bowles, 1988). A slurry wall is 
constructed when concrete is cast-in-placed in a cavity 
retained open by a slurry liquid. After the concrete 
cures, the soil next to the wall is excavated. Soldier 
pile and lagging uses steel H-piles driven into the 
ground prior to the actual excavation. Lagging is 
placed between the piles as the ground is excavated. 
The lagging may be either wood or steel members. 
Anchors or struts are used to support the wall as the 
excavation proceeds. 

If present, ground water acts against the wall and 
thus contributes to the stresses which must be carried 
by the wall. It also influences the effective stress 
of the soil. The total force felt by the wall is a 
combination of the hydrostatic force and the effective 
soil stress. If flowing water occurs, a seepage 
analysis should be made. Factors which must be 
considered in a seepage analysis includes the 
permeability of the insitu soil, leakage through the 
wall, flow parallel to the wall, excess pore pressures 
generated by changes in total stresses, seepage forces, 


and the time the excavation will be open and hence the 





degree of saturation. The actual pore water pressures 
generated will typically be less than static pressures. 


(Lambe and Turner, 1970) 


2.2 Soldier Pile and Lagging 


The procedure for constructing a soldier pile wall 
is to drive the H-piles into the ground prior to any 
excavating. The piles are driven with the flanges 
parallel to the proposed cut. They are usually spaced 
between four and ten feet apart. When they have been 
driven down to the desired depth (typically five to ten 
feet beneath the proposed excavation bottom when in 
soil), the excavation begins in stages. The first 
stage of the excavation is made to the location of the 
uppermost strut or anchor. Timber lagging, cut to fit 
between the webs of adjacent soldier piles, is placed 
in back of the front flanges of the piles. They are 
set one piece of lagging on top of the other with only 
a small spacer between them. Straw or a geotextile may 
be placed between and behind the lagging to reduce 
seepage through the wall. Once the lagging is set 
down to the first strut level, a horizontal wale is 
installed against the piles and the struts or anchors 


placed at the desired spacing. The excavation then 

















proceeds to the next strut level, with the process 
continuing until the final excavation is reached. 
(Keorner, 1984) 

Primary components of a soldier pile and lagging 
wall are as follows: 

l. Soldier piles which may be either steel H- 
beams, steel tubular pipes, concrete piles, or cast-in- 
place concrete piles. 

2. Support system of braced struts or anchors. 
Anchors may be cast-in-place deadman, piles used as 
anchors, sheetpile wall sections, or tieback anchors. 

3. Wales which distribute the anchor force as 
a line load between the soldier piles. They are 
usually structural steel sections. 

4. Wood or metal lagging which supports the soil 
between the piles. (Boghrat, 1989) 

Advantages of using soldier pile and lagging walls 
include fewer piles, the lagging does not have to be 
extended below the excavation bottom, and the soldier 
piles can be driven easier in hard ground than can 
sheetpile sections. By varying the spacing of the 
soldier piles, underground utilities may be avoided. 
Also the use of heavy sections for piles will allow 


wider spacings of wales and bracing. (Merritt, 1976) 
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2.3 Tieback Anchors 

Temporary tieback anchors are used to support the 
sides of deep excavation retaining structures. Tieback 
systems deform less than strut braced excavations 
because; (a) a force at or above the active earth 
pressure is locked off in every tieback, (b) tieback 
construction does not require over excavation, (c) 
tiebacks are not subject to significant temperature- 
caused deformations or loads, and (d) rebracing is not 
required for tieback walls. When the depth of the 
excavation exceeds fifteen to twenty feet and the width 
exceeds sixty feet or when obstructions significantly 
impact construction, tieback walls are usually less 
expensive than strut braced support systems.  Tieback 
walls provide a clean open excavation for construction. 
Internally braced walls interfere with excavations, 
concrete work, structural steel placement, and 
backfilling.  (FHWA/RD-82/047, 1982) 

Some disadvantages of a tieback anchor system may 
include obtaining permission for the placement of the 
anchors in the property of a municipality or a private 
owner. The location of the anchors may be outside the 
boundaries of the project where soil properties were 


not obtained. Achieving a satisfactory anchorage 
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capacity in soft clays or submerged sands may also be 
difficult to achieve. (Clough, 1972) 

The capacity of tieback anchors is dependent on 
the size and shape of the anchor, tendon type and size, 
insitu soil properties, and installation and grouting 
method of the anchor. Design of a tieback system 
should include the following: 

a. a tieback feasibility evaluation, 

b. an evaluation of the risk and consequences 
of failure, 

c. the selection of a tieback type, 

d. the estimation of the tieback capacity, 

e. determination of the unbonded and total 


tieback length, 


f. selection of a corrosion protection system, 
g. selection of a tieback testing procedure, 
and 
h. establishment of an observation and monitoring 


system. (FHWA/RD-82/047, 1982) 
Federal Highway Administration report number 
FHWA/RD-82/047, Tiebacks, provides detailed guidance 


and design procedures for tiebacks. 
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CHAPTER THREE 


DESIGN THEORY 


3.1 Lateral Earth Pressures in Braced Excavations 

When sufficient yielding of a retaining wall 
occurs, the lateral earth pressure can be approximated 
by Coulomb's or Rankine's theory. However, braced 
excavations yield differently than conventional 
retaining walls. Figure 3.1 depicts the different 
deflections of the two wall types. The deformation of 
a braced wall gradually increases with the depth of 
excavation. The variation of the amount of deformation 
will depend on the type of the soil, depth of the 


excavation, and construction of the wall. 


Retaming Wall Bracirg Cut 










1 
Detlection X RE 


Mall 
Deflection 


Bottom ot Cut 


Figure 3.1 
Nature of Yielding of Retaining Wall and 
Braced Cut (Das, 1990) 
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At the top of the excavation, deformations are 
small thus the lateral earth pressure approaches the at 
rest condition. At the bottom of the excavation, the 
deformations are greater, but the lateral earth 
pressure will be lower than Rankine's active earth 
pressure. Therefore the distribution of lateral earth 
pressure deviates from the usual linear distribution 
(Das, 1990). This is illustrated in Figure 3.2. The 
total force exerted against the wall may be 10-15% 
greater than active condition. The state of stress 
behind a braced excavation has been described as an 
arching active condition (Lambe and Whitman, 1969 and 


Cernica, 1982). 


Actual 


Rankine! s 


Figure 3.2 


General Pressure Distribution on Braced 
Excavation (Cernica, 1982) 
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The pressure envelopes proposed by Terzaghi and 
Peck (1967) and as recommended by NAVFAC DM-7.2 (1982) 
are assumed for the design conditions within the 
program. The earth pressure envelopes for braced walls 
in sands, soft clays, and stiff clays are illustrated 
in Figure 3.3. For stiff clays, NAVFAC DM-7.2 (1982) 
recommends horizontal stresses between 0.2 and 0.4% H. 
The value of 0.4YH is used within the program. The 
stability number is calculated as N. = YH/c. Where % 
is the unit weight of the soil, H is the depth of the 
excavation, and c is the undrained shear strength of 
the soil. Characteristics of these pressure envelopes 
include: 

a. They apply to excavations deeper than twenty 
feet. 

b. The pressure envelopes assume the water table 
is below the bottom of the cut. Sands are assumed to 
be drained with the lowering of the ground water table 
behind the wall. Clays are assumed undrained and under 
short-term conditions. 

c. Lateral stresses are apparent stresses which 
are to be used for the calculations of the reaction 


loads. 
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d. The behavior of an excavation in clays depends 


on its stability number. (Lambe and Turner, 1970) 
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Pressure Distributions on Braced Excavations 
(NAVFAC DM-7.2) 


The apparent stresses are for entire sand or clay 
layering only. Engineering judgment should be used for 
tills, silts, or fills; varying soil type with depth; 
and when hydrostatic stresses act on the wall. 

Lambe and Turner (1970) concluded that predicting 


the behavior of braced excavations cannot be made with 
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complete confidence. This is the result of difficulty 
in selecting the proper soil parameters, field boundary 
conditions, and the details of construction. However, 
Ulrich (1989) concluded that the recorded pressures for 
overconsolidated clays agree with those developed by 
Peck (1969). Ulrich also noted that soil 
stratification does not have a significant influence on 
the apparent earth pressure in overconsolidated clays. 
In another case study in Washington D.C. where the soil 
stratification was layers of sands, silty sands, and 
stiff silty clays, the measured earth pressures fell 
within the apparent earth pressure envelope of 0.2 SH 
for clays (Chapman et al., 1972). Results from other 
excavations in the Washington area revealed that the 
apparent earth pressure coefficient varied with the 
depth of the cut. A value of 0.159 H for a thirty foot 
cut, 0.280 H for a forty to fifty foot cut, and 0.238 H 
for a sixty foot cut (Chapman et al., 1972). The 
design of braced cuts is predominately based on 
pressure diagrams derived empirically as a result of 
field tests. Sound engineering judgement should be 
used in determining the applicability of a given 


pressure diagram for a particular cut. 
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3.2 Active and Passive Earth Pressures 

For the initial two stages of construction, the 
soldier pile wall will develop earth pressures 
approaching the active and passive states. In granular 
soil, the soil is assumed to be drained and active 
earth pressures are developed as the wall deforms 
laterally. This is resisted by the passive resistance 
which is developed as the H-beam compresses the soil 
acting on an effective area of three times the width of 
the H-beam below the bottom of the excavation. However 
there exists some uncertainty of how the pressures act 
at and below the excavation line (Bowles, 1988). The 
active and passive earth pressure coefficients are 
calculated assuming Rankine's theory. 

In the case of cohesive soils, undrained 
conditions (®$ = 0) are assumed with no frictional 
resistance developed. The stresses in the tension zone 
are neglected in the design computations with the depth 


of the tension zone taken as z, = (2*c-q)/ Y 


3.3 Hydrostatic Pressure 


Hydrostatic pressure is calculated as the unit 
weight of water (62.4 pcf) multiplied by the height 


of the water table. It is assumed in the program 
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that sand and gravels are drained and the water table 
will be drawn down to the bottom of the excavation by 
natural seepage or mechanical dewatering. This is 
illustrated in Figure 3.4. Clay layering is assumed to 
be undrained and analyzed using either a total or 


effective stress analysis approach. 


Ground Surface 
CANAN. ADAR >&v x 7 
SAND - DRAINED 








riginal Ground Water Surface 


Botton of Cut N 
Water table draun doun to 
bottom of cut due to seepage 
through timber sheeting or 
mechanical deuatering. 





Figure 3.4 
Draw Down of Ground Water Table in Sands 
due to Natural Seepage or Mechanical 
Dewatering (NYCTA, 1974) 


3.4 Total versus Effective Stress Analysis 


Some question on how to analyze the wall is raised 
when the ground water table is located above the bottom 
of the excavation in clay layering. The apparent 


lateral earth pressure envelopes proposed by Peck are 
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based on empirical data from total stress analyses. 
The use of a buoyant unit weight rather than the total 
unit weight of the soil and superimposing hydrostatic 
pressure onto the earth pressure diagrams change the 
analysis to an effective stress analysis approach. 
However the total stress soil parameter of undrained 
shear strength is still used. Therefore this effective 
stress analysis approach is not entirely correct. 

Either a total or effective stress analysis 
approach may be used to design the wall. In the case 
of a total stress analysis, the saturated unit weight 
above and below the water table should be entered. For 
an effective stress analysis approach, the saturated 
unit weight above the water table and the buoyant unit 
weight below the water table should be used. The 
location of the ground water table for the effective 
stress analysis must therefore be located above the 
bottom of the cut. 

Generally, the results from using the total unit 
weights (total stress approach) are more critical 
loading conditions than the approach adapted by using 


buoyant unit weights (Liao and Neff, 1990). 
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3.5 Surcharge Pressure due to a Strip Load 


To account for the lateral pressures due to a 
strip surcharge load located at some distance from the 
wall face, an equivalent uniformly distributed pressure 
acting on the wall is developed. The total force 
exerted by the strip load on the wall is calculated and 
then converted to a uniform pressure by dividing the 
total force by the height of the wall. The force is 
calculated by the equations derived by Jarquio (1981) 


and as illustrated in Figure 3.5. 


FROM: TO: 


q = P/h 





( ]6 - 02) "# رم رط * 20 - م 
B2 = arctan [ (a +b ^» h J]‏ 
ol = arctan [bzh]‏ 


Figure 3255 
Conversion of Strip Surcharge Load to an Uniform Pressure 
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3.6 NAVFAC DM-7.2 Recommendations on Flexible Wall 
Design 

The following recommendations from Naval 
Facilities Engineering Command, Design Manual 7.2 
(1982) were considered in the programming. 

a. The total resistance force acts on an 
effective area of three times the flange width of the 
pile SDE) as shown in Figure 3.6. This is to account 
for the differences between the failure in soil of an 
individual pile element and that of a continuous wall 


for which pressure distributions were derived. 





bf 
Ba 
459 
2 bi 
Figure 3.6 


Effective Width of Soldier Pile that Passive 
Pressure Acts Upon (NYCTA, 1974) 


b. For temporary construction, a factor of safety 
of 1.5 should be applied to passive pressures. This 
option is available within the program but it is not 
recommended. Passive resistance is calculated using 


Rankine's theory which is already conservative compared 
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to a logarithmic spiral failure surface approach to 
estimate passive resistance. 

c. Neglect the soil resistance to a depth of 1.5 
times the pile width from the bottom of the excavation 
for clays and the depth of the pile width for sands. 
This, however, is not accomplished in the program. It 
was considered that significant conservativeness 
already exists within the wall design. 

d. The required depth of embedment is calculated 
based on controlling the moment within the section to 
ensure the pile is not overstressed at the final 
anchor location. The active soil pressure will be 
resisted by the passive pressure and the allowable 


moment of the section. 


3.7 Other Design Considerations 

Other design considerations included within the 
program are: 

a. To calculate the anchor reactions, it is 
assumed the piles are hinged at the bottom of the 
excavation and at all the anchor locations except the 
upper anchor. The soldier pile between each pair of 
hinges is assumed to be a simply supported beam 


(Bowles, 1988 and Das, 1990). 
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b. An allowable stress for the steel soldier 
piles of 28,800 psi is used to calculate the required 
section modulus. 

c. Wales are designed assuming they act as simply 
supported beams, pin-ended with maximum moments equal 
to w*1?/8. This moment is then increased by 33% to 
allow for overstressing during preload testing of the 
anchors. An allowable stress for the steel of 28,800 
psi is used to calculate the section modulus from the 


maximum moment. 


3.8 Design Methodology for Wall Analysis 


For the first two stages of construction, the 
active and surcharge forces are being resisted by the 
passive and reaction (stage two) forces. The reaction 
force is calculated by summing moments about the point 
of net zero forces on the embedded pile assuming it is 
hinged there and thus zero bending moment. The maximum 
moment within the pile can be calculated by summing the 
moments about the point of zero shear. From the 
maximum moment, the required section modulus is 
calculated. The embedment depths are calculated for 
stage one by determining the point where the net moment 


is zero and for stage two by assuming fixity at the 
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anchor location and summing moments there so the pile 
is not overstressed. For clays, the stresses within 
the tension zone are neglected in the calculations. 
The force diagrams are illustrated in Figures 3.7 and 
3.8 for sands and clays respectively. 

کے سو و ا ھا تک 
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Figure 3.7 
Force Diagram for Stage Two of Construction in Sands 
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Figure 3.8 
Force Diagram with and without a Tension 
Zone for Stage Two of Construction in Clays 
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Kiewit design procedures are also used to 
calculate the maximum moments and reaction force for 
the initial two stages of an excavation. Kiewit 
procedures were developed by Peter Kiewit Sons' 
Company based on empirical data and field results. 

In the first stage, it is assumed that a pinned 
connection exists in the pile two feet below the 

bottom of the excavation. The maximum moment is 
calculated at this point. In the second stage, the 
maximum moment is taken as M - w*12/9. Where w is the 
average pressure on the span from the first anchor to 
the bottom of the cut and 1 is the distance between the 
anchor and the bottom of the cut. The reaction force 
18 calculated assuming pinned connections at the anchor 
location and the bottom of the cut. 

After the second anchor is in place, the pressure 
distribution will correspond to those for braced cuts. 
Reaction forces are calculated by assuming pinned 
connections and summing moments about the anchor 
locations. Next the point of zero shear is found and 
moments summed about it to calculate the maximum 
moment. The pressure diagram for sands is depicted in 
Figure 3.9 and in Figures 3.10 and 3.11 for clays. 


Embedment depth is determined by summing moments at the 
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last anchor point assuming fixity so the pile 1s not 


overstressed. This is illustrated in Figure 3.12 for 





sands. 

sigs sigh 
Sigs = Kakgks 
sigh = 0.65Kakskut kh 
sig = Kaxsk(q + 0. 65utsh) 

pp = 3Kpvfs X (uttbíxD^2/2) 

Figure 3.9 
Pressure Diagram for Stage Three of Construction 
in Sands 
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Figure 3.10 
Pressure Diagrams for Stage Three of Construction 
in Stiff Clays 
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Figure 3.11 
Pressure Diagram for Stage Three of Construction 
in Soft to Medium Clays 
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Figure 3.12 
Force Diagram for Determining the Embedment Depth in 
in Sand Assuming Fixity about the Last Anchor Location 
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3,9 Tieback Anchor Capacity 





In cohesionless soils, the tieback anchor 
capacity is calculated assuming pressure injected 
tiebacks using an effective grout pressure in excess 
of 150 psi. Figure 3.13 shows curves developed by 
Ostermeyer (1975) as an function of length and soil 
type. An average of these values was used to develop 
equations for each soil type to calculate anchor 
capacity in the program. These values assumed anchor 
diameters between four to six inches and a depth of 
overburden greater than thirteen feet. 

In cohesive soils, tieback capacity is based on 
post-grouted anchors with grout pressures in excess of 
150 psi. Figure 3.14 illustrates tieback capacity 
based on clay consistency. An anchor diameter of six 


inches was assumed to calculated tieback capacity. 


3.10 Minimum Unbonded and Total Anchor Length 


The unbonded length of the anchor is calculated 
based on locating the bonded length of the anchor 
outside the failure zone behind the back of the wall. 
The location of the failure zone is based on using 
the failure surfaces from Rankine's theory. Report 


number FHWA/RD-82/047 recommends that the length of 
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Figure 3.13 
Load Capacity of Anchors in Cohesionless Soil 
Showing the Effects of Relative Density, 
Gradation, Uniformity, and Anchor Length 
(FHWA/RD-75/128, 1976) 
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Figure 3.14 
Effect of Post-Grouting on Anchor Capacity in 
Cohesive Soils (FHWA/RD-75/128, 1976) 


31 





the anchor be of sufficient length to locate the anchor 
in soil which would not be affected by movement of the 
Wall. The unbonded length should place the anchor 
beyond the critical failure surface as illustrated in 
Figure 3.15. Also recommended is a minimum unbonded 
length of fifteen feet to avoid load losses as a result 
of long term steel relaxation, creep in the soil, 


anchorage seating losses, and structural deformation. 


Critical Failure Suríace 






Mall Face 


Ee Probable Failure Surface 
Through the Ends of the Tıebacks 


Figure 3.15 
Determination of the Unbonded and Total Tieback 
Length (FHWA/RD-82/047, 1982) 


The total anchor length should be of sufficient 
length to ensure a satisfactory factor of safety 
against sliding along the most critical failure 


surface through the ends of the anchors. If the factor 
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of safety is insufficient, the total anchor length 
should be increased (FHWA/RD-82/047, 1982). This is 
also illustrated in Figure 3.15. 

This computer program does not calculate the 
factors of safety against failure of the tendons, 
failure in the anchor zone, or overall external 
stability against wall failure. Boghrat (1989) 
recommends the use of the STABL computer program to 
calculate of the total anchor length to achieve a 
minimum factor of safety. The user manual for PCSTABL4 
is presented in the Federal Highway Administration 
Report No. FHWA-TS-85-229 (Carpenter and Kopperman, 


1985). 


3.11 Lagging Thickness 


The required thickness of the wood lagging can 
be estimated from Table 3.1 from report number 
FHWA/RD-75/128 (1976). The table is based on soil 


type, depth of the cut, and soldier pile spacing. 
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CHAPTER FOUR 


COMPUTER PROGRAM 


4.1 Program Flow and Logic 


The computer program logic and flow is illustrated 
in the flow charts shown in Figure 4.1. Appendix A 
contains the variable nomenclature for the program and 
the actual program file is included in Appendix B. 
Appendix C contains various calculations and equations 


used within the analysis functions in the program. 


4.1.1 Main Function 

The program starts with the main function which 
includes the main menu and exit routines. The main 
menu routine displays the main menu screen which 
prompts the user to input the next step. The options 
include enter soil and wall data, read data from an 
existing file, edit the input data, save the data ina 
file, execute the wall analysis, execute the anchor and 
wale analysis, save the analysis results, or exit 
the program. The program will execute the appropriate 
function upon input. The program will request 


verification before exiting. 
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Figure 4.1 
Computer Program's Flow Chart 
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INPUT FUNCTION 
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Figure 4.1 (Continued) 
Computer Program's Flow Chart 
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Figure 4.1 (Continued) 
Computer Program's Flow Chart 
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(Gg NALYSIS FUNCTION | 
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Figure 4.1 (Continued) 
Computer Program's Flow Chart 
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Figure 4.1 (Continued) 
Computer Program's Flow Chart 
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Figure 4.1 (Continued) 
Computer Program's Flow Chart 
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| Figure 4.1 (Continued) 
Computer Program's Flow Chart 
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Figure 4.1 (Continued) 
Computer Program's Flow Chart 





4.1.2 Data Functions 

The data functions will input, read, edit, and 
save the input data or save the analysis results. The 
input function prompts the user for the input of the 
various wall and soil data. The read function prompts 
the user for the filename of the data. If the file 
does not exist in the working directory, an error 
message is displayed and it requests the filename be 
reentered or the function aborted. Upon finding the 
file, the data is read and entered into the appropriate 
program variables. The view data function displays the 
wall and soil data and requests if any changes are 
desired. If a change is desired, the number of the 
item and then its new value are entered. The save data 
function will save the input data in a DOS file in the 
working directory. If the file already exists, 
verification will be requested before coping over it. 
Lastly, the save function will save the results of the 
analysis in a DOS file. The save routine will request 
the filename and verification before coping over an 
existing file. After executing a particular routine, 


the program returns to the main menu. 
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4.1.3 Analysis Functions 


The next series of functions perform the various 
analysis calculations. The analysis function requests 
entry of the estimated thickness of the pile, the 
factor of safety against passive pressure, and the 
depth of over-excavation below an anchor depth. 
Following input, the function determines the soil type 
and executes either the sand analysis or clay analysis 
function. After executing the sub-function and 
completing the calculations, flow is returned to the 
analysis function and the results are displayed. 

The sand analysis function executes its analysis 
in three stages. The first stage is for the initial 
stage of excavation before the first anchor has been 
installed. It calculates the point of zero shear, 
maximum moment at the point of zero shear, required 
section modulus from the maximum moment, and the depth 
of embedment at the point of zero bending moment. Stage 
two is for the second stage of excavation after the 
first anchor is installed. It calculates the same 
items as stage one plus the reaction force. The 
embedment depth is based on not overstressing the 
pile at the anchor location assuming fixity there. 


Additionally for the first two stages, the moments 
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and reaction force are calculated using the Kiewit 
criteria. Stage three is executed for the stages of 
construction after the second and thereafter anchors 
are installed. The pressure distributions for braced 
cuts are used in this stage. The reaction forces, 
point of zero shear, maximum moment, and required 
section modulus are calculated in the function. The 
embedment depth is calculated by calling the sub- 
function, "min_D". It calculates the embedment depth 
from the maximum moment for each particular stage. 
After the final stage is completed, the minimum 
embedment depth is calculated from the maximum moment 
for all the stages of construction. The sand analysis 
function uses the function "ka kp" to calculate the 
average unit weight, friction angles, and coefficients 
of passive and active earth pressures. The base 
friction angle and unit weight are the properties of 
the soil layer at the bottom of the excavation. 

If the soil type is clay, the function clay 
analysis is executed. It performs essentially the 
same calculations as the sand analysis function. It 
first determines the location of a tension zone, if 
it exists, and excludes the stresses within it from 


any calculations. Also it verifies the soil will 
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support the excavation based on the net passive 
resistance of the structure being greater than zero 
(Prep = 6c/fs + 2c - q > 0). An error message is 
displayed if it will not. In the third stage routine, 
the stability number of the cut is calculated and the 
pressure diagram corresponding to the stability number 
determined. The function "ca_cb_wt" is used to 
calculate the average unit weight and shear strength of 
the cut and the base shear strength. The base shear 
strength is calculated from an average over a depth 
twenty feet below the bottom of the excavation. 

Both the sand and clay analysis functions use the 
function "strip" to convert a strip surcharge load to 
an equivalent uniform surcharge load. This surcharge 
load is then included in the design calculations. 

The anchor analysis function is used to calculates 
the section modulus of the wale for each row of 
anchors, the required anchor capacity, the bonded 
anchor length based on soil type and anchor capacity, 
and the unbonded anchor length. Prior to the actual 
analysis, anchor spacing; the inclination angle of the 
anchors; and soil type are entered. After completion 
of the various calculations, the results are displayed 


before the program returns to the main menu. 
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4.2 Assumptions and Limitations 


1. The coefficient of passive earth pressure is 
calculated assuming Rankine's theory which 1s 
conservative compared to a logarithmic spiral failure 
surface approach in estimating the passive resistance. 

2. An average unit weight and friction angle (or 
cohesion) for the cut is used in the soil pressure 
calculations. The base values for sands are the 
properties of the sand layer at the bottom of the 
excavation. For clay layering, the base value for 
cohesion is calculated by averaging the cohesion values 
over a twenty foot depth below the bottom of the 
excavation. This is to account for soft or stiff 
layers just below the bottom of the excavation. The 
difference between a soft and very stiff clay layer is 
more significant than that between a loose and dense 
sand. It is recommended only minimal soil layering be 
used. 

3. A cut of entirely sand or clay layering is 
assumed in the program. The computer program will 
not accept mixed soil layering or silts. As an 
alternative, an equivalent value of cohesion for a 
sand layer may be averaged with a cohesion value of 


the clay layer as follows: 
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cy = [ ¥ ,*K,*H,*tané + (H-H,)*n'*q, ] /2H. 


Where, H = total height of the cut, 
ES height of the sand layer, 
1 = unit weight of the sand layer, 
K = lateral earth pressure coefficient for 


the sand layer (^1), 


$ - angle of friction of the sand layer, 

qz unconfined compression strength of clay, 
and 

n' = coefficient of progressive failure 


(ranges from 0.5 to 1). (Das, 1990) 
With the average unit weight for the cut, the 
pressure diagrams for clays can then be used to design 
the wall. NYCTA (1974) recommends an alternate method 
where the pressure diagrams are calculated using 
Rankine's earth pressure theory for the individual 
layers and an average uniform pressure over the entire 
wall calculated from these pressures. 

4. Sands are assumed to be drained with the water 
table being drawn down below to the bottom of the 
excavation. If the cut is not drained or the water 
table is not drawn down, the hydrostatic pressure 


should be included in the calculations. 
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5. For clays, short-term undrained conditions are 
assumed. If drainage may occur as in the cases of 
long-term construction (partially drained) or post- 
construction (fully drained), an effective stress 
analysis should be accomplished using effective stress 
parameters (c' and $'). Drained conditions for clays 
are usually more critical than undrained conditions. 

6. The assumption that the wall acts as a series 
of pinned beams is conservative compared to assuming a 
continuous beam and analyzing it using a finite 
element approach. 

7. The program does not calculate the overall 
stability of the structure. Most probable failure 
surfaces should be checked to ensure a satisfactory 
factor of safety. 

8. The program does not check the stability of 
the base. Seepage forces should also be considered if 
present to check for quick conditions. 

9. Anchor capacity is based on field testing of 
pressure injected tiebacks in cohesionless soils. The 
capacity curves used were developed with the majority 
of anchors less than eight meters and most were not 
tested to their ultimate capacity (FHWA/RD-82/047, 


1982). For cohesive soils, post-grouted tiebacks are 
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assumed. The mechanism by which post-grouted tiebacks 
develop their capacity is not entirely understood. 
Increases in capacity of 25% to over 300% are possible 
depending on the soil type and the post-grouting method 
(FHWA-RD-82-047, 1982). The curves used represent a 
wide range of values and an average of these values is 
used to calculate capacity. The actual field 
capacities of the tiebacks should be verified in the 
field. 

10. Wale design is conservatively calculated based 


on assuming pinned ends at the anchor locations. 


4.3 Example Problems 


Examples problems for sand and clay layering, 
with and without a ground water table present are 
included in Appendix D. The solutions are compared to 
the computer's solutions to ensure reasonable results 


are produced by the program. 
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CHAPTER FIVE 


USER'S GUIDE 


5.1 Program Start-Up 


The program may be run either on the computer's 
hard drive or one of its floppy drives. From the DOS 
prompt, change the command prompt to the drive and 
directory on which the program is located. Then type 
SOLDIER and press enter to start the program. The 
program starts up and displays the main menu shown in 


Figure 5.1. 


Figure 5.1 
Main Menu Screen 


Design of Soldier Pile and Lagging 


In Accordance with NAVFAC DM-7 





MA IN MENU 


Enter Soil Properties and Wall Data 
Read Data From an Existing File 
Edit Input Data 

Save Input Data 

Execute Wall Analysis 

Execute Anchor\Wale Analysis 

Save Analysis in an Output File 
Exit Program 


0 A Oh Qn Aa Y IS سم‎ 


Your Choice? -- 
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The user then should enter the next step, usually 
enter or read data. The description of the required 
input data is listed in the next section. The 
analysis functions can only be executed after the 


data have been entered. 


572 Input Data 


The following data shall be entered for the 
various analysis functions. Figure 5.2 illustrates 


various input data. 


Distance from wall Strip Load 
to strip load ٢ 
Surcharge Load 
ا ةا‎ apas 7 


Top Elevation Slope of Backf111 


Layer ]: 
Anchor Elevatıon Top elevation, unit weight, and friction angle 


or cohesıon. 


Elevation oí GHT 
Anchor Elevation 


Layer 2: 
Tap elevation, unit wt, and friction angle 
or cohesion. 


Anchor Elevation 


—— 
Layer 3: 
Top elevation, unit verght, and friction angle 
Botton Elevation or cohesion, 
N 
Spacing of Soldier Piles 
Figure 5.2 


Input Variables for Wall Analysis 
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5.2.1 Wall Data 


1. Name of engineer, for maximum of 40 
characters. 

2. Project title, for maximum of 40 characters. 

3. Date of report, for maximum of 30 characters. 


4. Elevation of the top of the excavation (ft). 

5. Elevation of the bottom of the excavation 
(EE). 

6. Number of anchors used in the cut for a 
maximum of ten anchors. 

7. Elevation of the anchors from the top of the 


excavation to the bottom (ft). 


8. Center to center spacing of the soldier piles 
(EE). 

5.2.2 Soll Data 

1. Number of soil layers for a maximum of ten 
layers. 

2. Soil type of the entire excavation, either one 


for sands or two for clays. 

3. For clays, the type of the analysis to be 
performed (either total or effective stress analysis) 
is entered. If a total stress analysis is to be 


accomplished, the saturated unit weight of the soil 
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above and below the ground water table is entered. For 
an effective stress analysis, the saturated unit weight 
of the soil is entered above the water table and the 
buoyant unit weight entered below the water table. The 
elevation of the ground water table should be above the 
bottom of the excavation for the effective stress 
analysis. 

4. Soil properties including elevation of the top 
of the layer (ft), saturated, buoyant, or moist unit 
weight (kcf), and friction angle (degrees) for sands or 
undrained shear strength (ksf) for clays. 

5. Elevation of the ground water table (ft). 

6. Slope of the ground surface behind the 
excavation (degrees). 

7. Uniform surcharge load (ksf). 

8. Strip surcharge load (ksf), the width of the 
strip load (ft), and the distance from the wall face to 


the start of the strip load (ft). 


5.2.3 Wall Analysis Data 
l. Estimated width of the flange of the soldier 


pide (ft). 
2. Factor of safety against passive resistance. 
3. Depth of over-excavation below an anchor 


elevation for intermediate stages (ft). 
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5.2.4 Anchor Analysis Data 
1. The spacing of anchors (ft). 


2. The angle of inclination the anchors are set 
from horizontal (degrees). 
3. The type of soil the anchors are set in. The 


options include: 


Type Soil Description SPT_N Value 
1 Fine to medium sand 125271230 
2 Medium to coarse sand 20 - 45 
3 Sandy gravel > 45 
4 Medium clay 4 - 8 
5 Medium stiff clay 9 = 11 
6 Stiff clay 2415 
7 Stiff to very stiff clay | 6 0 
8 Very stiff clay 21 - 30 
9 Very stiff to hard clay > 30 


5.3 Output Data 


Figure 5.3 lists a typical output file. The 
output file is broken down into four sections: wall 
properties; soil properties; wall analysis results; 
and anchor and wale analysis results. The wall and 
soil property sections list the input data for the 


wall and soil under items 1 through 12. 
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k k k k k k k k k k k k k k K K k k k k k k k k k k k k k k k k k K k k k k k k K K k k k K k k k k k k Kk‏ او 


x x 
* Design of Soldier Pile and Lagging * 
* In Accordance with NAVFAC DM-7 * 
7 k 


k K K k k k k k k k k x k e ce coe oe coo ee S k k k k k k k k k k k k k k k k k k K k k k k k k k k 


I. WALL PROPERTIES 

1. Engineer: D'Amanda 

2. Project: International Corporate Park 

3. Date: 10 November 1989 

4. The elevation of the top of the excavation is 
102.00 feet. 

5. The elevatıon of the bottom of the excavation is 
81.00 feet. 

6. The number of anchors is 2. 


The anchors are located as follows: 
Anchor Elevation (feet) 
1 96.00 
2 89.00 
7. The spacing of the soldier piles is 5.00 feet. 


JI S: O I L PROPERTIES 


8. The elevation of the water table is 50.00 feet. 
9. The soil properties are as follows: 


Soil Type Elev Unit Wt Friction Angle 
or Cohesion 
sand 102.00 0.1150 38.00 


10. The slope of the ground behind the wall is 31.5 
degrees. 

11. The surcharge load is 0.250 ksf. 

12. The strip load is 0.50 ksf, 10.00 feet wide, and 
located 45.0 feet from the wall. 


111. NAL L ANALYSIS RESULTS 
13. Estimated width of the soldier pile is 0.5 feet. 
14. Factor of safety for passive resistance is 1.0. 


15. The wall was excavated 1.0 feet below the proposed 
anchor location. 


Figure 5.3 
Sample Output File 
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16 STAGE ZERO MAXIMUM SECTION EMBEDMENT 


REACTION(S) 
SHEAR MOMENT MODULUS DEPTH 
(ft) (k-ft) (in^3) tL) (kips) 
1 qc P 55.23 23.01 1O1 ري‎ 
2 21.9 2045 8.52 55 RI - 19.10 
3 17.0 27.86 11.61 4.6 Rl = 42.04 
R2 = 7 
NOTE: Stage 1 moment based on Kiewit criteria is 


42.1 kip-ft. 
Stage 2 moment based on Kiewit criteria is 
19.0 kip-ft and reaction force is 16.7 kips. 


NOTE: Minimum depth of embedment based on maximum 
moment is 3.8 feet. 


NOTE: NYCTA recommends minimum penetration depth of 
six feet. 
IV. ANCHOR A N D WALE RESULTS 
17. Spacing of the anchors is 10.0 feet. 
18. The anchors are set at an angle of 5.0 degrees. 
19. The anchors are set in medium to coarse sand. 
205 
ANCHOR SECTION MODULUS ANCHOR ANCHOR UNBONDED 
ROW OF WALE CAPACITY LENGTH LENGTH 
(in 5) (kips) (ft) (ft) 
1 58.4 84 7.4 7.0 
2 23.8 34 4.0 3.8 
NOTE: Tieback capacity is based on pressure 


injected anchors using and effective grout 
pressure in excess of 150 psi with a diameter 
between 4 to 6 inches and depth of overburden 
greater than 13 feet. 

NOTE: FHWA/RD-82/047 recommends a minimum unbonded 
length of 15 feet. 


END O F ANALYSIS 


Figure 5.3 (Continued) 
Sample Output File 
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In the wall analysis results section, items 13 
through 15 are the input values for the width of 
the pile, factor of safety for passive resistance, 
and the depth of over-excavation respectively. The 
actual results from the analysis are listed under 
item 16 and include: stage; point of zero shear; 
maximum moment; embedment depth; and reaction forces. 
The location of the point of zero shear is from the top 
of the pile. The depth of embedment is calculated 
from the maximum moment for that particular stage and 
is measured from the bottom of the cut. Four notes may 
be displayed within this section. The results using 
the Kiewit criteria for the first two stages are listed 
in the first note. The next note lists the minimum 
depth of embedment based on the maximum moment from all 
stages of excavation. If the penetration depth for the 
last stage or the minimum embedment depth is less than 
six feet, a note is displayed indicating NYCTA (1974) 
recommends a minimum penetration depth of six feet. 
The last note is displayed for clay layering stating 
the type of analysis, either total or effective stress, 
used in the calculations. 

The anchor and wale analysis results section 


lists the anchor spacing, inclination angle of the 


59 





anchor, and soil type under items 17 through 19. The 
results of the analysis are listed under item 20. 1٢ 
includes anchor row, section modulus of the wale, 
required anchor capacity, (bonded) anchor length, and 
unbonded anchor length. A note is displayed stating 
how the anchor capacity was derived. Another note is 
displayed if the unbonded length of the anchor is less 
than fifteen feet.  FHWA/RD-82/047 recommends a minimum 


unbonded length of fifteen feet. 


5.4 Error Messages 


The follow error messages are possible within 
the program: 

"You must input or read data before editing them." 
Data must be entered or read before selecting the 
edit function. 

"You must input or read data before you save 
them." Data must be entered or read before selecting 
the save data function. 

"You must input or read data before analysis." 
Data must be entered or read before selecting the 
wall analysis function. 

"You must accomplish wall analysis before you can 
save it." The wall analysis function must be 
accomplished before selecting the save function. 
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"You must accomplish wall analysis before this 
analysis." The wall analysis function must be 
accomplished before selecting the anchor/wale analysis 
function. 

"The bottom of the excavation must be below the 


tt 


top. The elevation entered for the bottom of the 
excavation must be below the top of the excavation. 

"The elevation of this anchor must be below the 
prior anchor or the top of the excavation and above the 
bottom of the excavation." “The elevation entered 
for the anchor location must be below the previous 
anchor location or the top of the excavation and 
above the elevation of the bottom of the excavation. 

"The location of the water table can not be above 
the top of the excavation." The elevation of the 
ground water table must be entered below the elevation 
of the top of the excavation. 

"The soil type must be either l1 (sands) or 2 
(clays)." The soil type for the cut must be entered 
either l or 2 for sands and clays respectively. 

"The first layer must extend to the top of the 
excavation." For the first soil layer, the elevation 
of the top of the layer must extend to the top of the 


excavation. 
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"The elevation of the top of the soil layer must 
be below the last layer." The elevation entered for 
the top of a soil layer must be below the elevation of 
the previous layer. 

"The location of the ground water table must be 
above the bottom of the excavation for an effective 
stress analysis." When using an effective analysis 
approach to calculate stresses for clay layering, the 
ground water table must be located above the bottom of 
the excavation. The buoyant unit weight of the soil 
should be entered below the water table. 

"Trouble opening 'filename' -- Read mode.  Reenter 
the filename or type abort to return to the main menu." 
The filename entered for read data does not exist in 
the working directory. Either the filename must be 
reentered or abort entered to return to the main menu. 

"Width must be positive." The estimated width 
of the flange of the soldier pile must be entered as 
a positive number. 

"Factor of safety must be positive." The factor 
of safety for passive resistance must be entered as a 
positive number. 

"Soil will not support the wall below a depth of 
XX.X feet." For clay layering, the soil will not 
support the wall below the depth listed. 
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CHAPTER SIX 


CONCLUSIONS 


6.1 Review of Objectives 

The objective of the computer program was to 
provide a rapid and effective method to analyze braced 
excavations. By varying the number and location of 
tieback anchors, the design of a soldier pile and 
lagging wall may be optimized. Once an initial design 
is computed, the engineer may then accomplish final 
design calculations based on the results from the 
computer program. This will significantly reduce the 


time to accomplish an actual design. 


6.2 Summary of Design Procedures 

Recommended design procedures are first to 
determine the soil conditions, wall requirements, and 
any surcharge loads. Next, select an initial number 
of anchors and their respective locations. Then run 
the program with the selected data, revising the number 
and locations of the anchors until the reaction 
forces and required section modulus are within 


acceptable limits. A soldier pile section may be 
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selected from the Manual of Steel Construction (1980) 
based on the required section modulus. Lagging size 
may be chosen from the design table included in chapter 
three (Table 3.1) from FHWA/RD-75/124 (1976). The 
anchor analysıs function of the program may be used to 
estimate the wales' section modulus and the unbonded 
and bonded length of the tieback anchors. Spacing of 
the anchors may be varied until acceptable results are 
produced. Also by adjusting the input parameters, the 
effects of a ground water table; different soil 
conditions; or increased surcharge loading may be 
analyzed. 

The program does not check the overall stability 
of a wall and the surrounding soil mass. The soil 
pressure acting against a wall may be greater in the 
case of slope stability than for braced cuts and thus 
govern wall design. Also, the factors of safety 
against failure of the steel tendons of the anchors 
and failure in the anchor zone should be verified 
separately. The computer program PCSTABL can be used 


to accomplished this analysis. 
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6.3 Conclusions 

The program SOLDIER.EXE can provide the engineer 
with a quick and effective method of designing a 
soldier pile and lagging wall. With the program, the 
engineer can also investigate the effects of differing 
soil conditions, water table location, surcharge 
loading, and wall dimensions and properties. 

The engineer must understand the design concepts 
and assumptions made within the program to ensure they 
are applicable to a particular project. This 
computer program is not intended to be a replacement 
for a complete design by a competent engineer. The 
stresses produced by braced cuts can only be roughly 
estimated and a monitoring system should be employed 
for critical cuts to ensure the acceptable performance 
of the wall. The overall satisfactory performance of 
the wall depends greatly on determining accurate soil 
parameters, the external loading conditions, and the 


use of proper construction procedures. 
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APPENDIX A 


VARIABLE NOMENCLATURE 


66 


The nomenclature of the variables used within 
the program are listed as follow. 


Definition (units) 


Name of engineer, for maximum of 40 
characters. 


Project title, for maximum of 40 
characters. 


Date of report, for maximum of 30 
characters. 


Top elevation of the excavation (ft). 
Bottom elevation of the excavation (ft). 


number of anchors used in the cut 
excavation. 


Elevation of anchor for maximum of ten 
anchors (ft). 


Spacing of the soldier piles (ft). 
Elevation of the water table (ft). 
Number of soil layers. 


Type of soil. Either one for sands or 


two for clays. 


Soil properties for maximum of ten 
layers: Elevation of top of the layer 
(ft), saturated or moist unit weight 
(kcf), and friction angle (degrees) or 
cohesion value (ksf). 


Slope of the ground behind the 
excavation (degrees). 


Surcharge load (ksf). 


Estimated thickness of flange of soldier 
pile (ft). 
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Variable 


engineer 


project 


date 


telev 
belev 


numa 


anc[10] 


S 
gwt 
nums 


soil type 


soilf[10][3] 


bf 





Factor of safety against passive 
resistance. 


Depth of over-excavation below the 
anchor elevation for intermediate stages 
(EU): 

Spacing of anchors (ft). 


Inclination angle the anchors are set 
(degrees). 


Soil type for anchor analysis 
calculations. 


Constant value of 3.141592654. 
Name of file to save or read data or to 
save analysis, for maximum of 10 


characters. 


Average saturated or moist unit weight 
of cut soil (kcf). 


Average Friction angle of soil 
(degrees). 


Saturated or moist unit weight of base 
soil (ksf). 


Friction angle of base soil (degrees). 


Coefficient of active earth pressure for 
the cut soil. 


Coefficient of active earth pressure for 
the base soil. 


Coefficient of passive earth pressure 
for the base soil. 


Horizontal stress or force due to soil 
(ksf or kips). 


Horizontal stress or force due to 
surcharge (ksf or kips). 
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fs 


ang 


type 


pi 


filename 


wt 


fa 


wtb 


fab 


Ka 


Kab 


Kp 


sigh 
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Net passive resistance pressure or force 
(ksf or kips). 


Hydrostatic force or stress (kips or 
ksf). 


Undrained shear strength of cut clay 
soil (ksf). 


Average undrained shear strength of base 
clay soil (ksf). 


Stability number of the cut for clays. 
Length of tension zone for clays (ft). 


Depth of zero shear from top of 
excavation (ft). 


Reaction forces for each stage of 
construction (kips). 


Maximum moment for a stage of excavation 
(Kip ft). 


Required sectipn modulus for a stage of 
excavation (in). 

Embedment depth for a stage of 
excavation (ft). 


Maximum moment from all stages of 
excavation (kip-ft). 


Minimum embedment depth calculated using 
Mmax (ft). 


Maximum moment from Kiewit Analysis for 
stage one and two of sand analysis (kip- 
BE. 


Reaction force from Kiewit Analysis for 
Stage two of sand analysis (kips). 


Anchor force for maximum of ten 
reactions (kips). 
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PP 


Ca 


cb 


Ns 
zt 


z[11] 


R[10][10] 


Mf11] 


5111 ( 


D[11] 


Mmax 


Dmin 


Mk[ 2] 


Rk 


P[ 10] 





sw[10] Section Modulus of wale no 


L[10] Bonded length of anchor (ft). 

ul[10] Unbonded length of anchor (ft). 

bp Used as a flag. 

C Dummy character. 

cc[20] Dummy characters, for maximum of twenty. 


H, h, hh, hhh Various height of the cut variables 
EL 


a, v, Y Internal variables used in various 
calculations. 


1 Ky 1 Global counters. 
1031 Local counters. 
str_anal Type of stress analysis to be performed 


for clay layering. Either 1 for total 
or 2 for effective stress analysis. 
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APPENDIX B 


COMPUTER PROGRAM FILE 
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171476 د 
wi? MEÁBRDONET ARTO‏ 





k K k k k k k x x k k K k k k k k k k k k k k k k k K k k k k k k X xk k k k k k k k k K k k k k k k K k k k k k k k k k 


* SOLDIER.EXE, Version 1.01, dtd 15 NOV 91 

* Program written by Kevin D'Amanda. 

* Address until Jan 95: 

* COMCBLANT, Naval Amphibious Base Little Creek, 
k 

X 


Norflbk, VA 23521-5070 
*k k k k k k k k k k k k k k K k k k k k k k k k k k k k k k k k k k k eo ox پیا‎ x بل اہ بیو‎ x با با‎ A x x x x x پل‎ kx x kx د پل‎ 


E V و و‎ 
— — — — — Dën, لا‎ 


#include <conio.h> 
#include <stdio.h> 
finclude <ctype.h> 
#include <stdlib.h> 
#include <complex.h> 
#include <string.h> 


// K k ما لما لما لما لما نما نما نما لما لما لما لما لما لما لم لما لما لما لما لما لما لما نه‎ k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k x k k 


> DECLARE FUNCTION 
| [BRI € 


void input(void) ; 

void read. data(void); 
void save, data(void); 
void view data(void); 
void analysis(void); 

void anchor(void); 

void ka kp(void); 

void clay analysis(void); 
void wt. c. cb(void); 

void sand analysis(void); 
void save(void); 

void min, D(void); 

void strip(void); 


y / K K k x ما لما ما نما نم کم کم لم لما لم لم لم لم ما نم لما نم نم لم لم لم لم لم نم لما‎ k k k k k k k k k k X k k k k k k X k k k k k k k k k k k k x xk k 


۸ DECLARE VARIABLES 
K/ بل بل‎ k جا‎ < K k k k k k k k k k k k k k k k k k k k k k k k < k k k k k k k k k k k k k از‎ k k k k k k k k k k k k k k k 


gwt = 0, q = 0, b = O 


float belev = O, telev = O, s ١ 
= w[10], d = 0, ang = 0, L[10], 


anc[10], soil[10][3], hh , H, 
ul[10], bf = 0, fs = 0, w = O, 
double sigh, sigs, wt, fa, v, y, Ka, Kp, Kab, wtb, fab, u, P[10], 
Mc[2], Rc, qe, Mmax, Dmin, z[11], D[11], M[11], S[11], 
R[10][10], zt, pp, cb, ca, Mk[2], Rk; 

int type = 0, numa = 0, nums = 0, i = 0, k = O, j = O, 1 = O, 
bp = 0, soil_type, str_anal; 

const float pi = 3.141502654; 

char c = 'x', cc[20], filename[10], engineer[40], project[40], 
date[30]; 
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E/ * K k k k k k k k k k k k k k k k k k k k k k k k k k k k K k k k K k K k k k K k k k k k k K K k k k k k k k K K k k k k k k 


// * MAIN FUNCTION 
II رو را و ار پر ار و پر با پا رر با رر و و پر ار او پو ار او باو ار از او پر باو باو پا پا پا پا بل لا للا«‎ I IKI IK 


main(void) { 


717 k K k k k k k k k k k k k k k k k K k Kk k k k k k k k k k k k k k K k k k k k k k k k k k k k k k k k k k k k k k k k k k k 


7× INITIALIZE VARIABLES 
Y] É k k k k k k k k k k k k k k k k K k K k k k k k k k k k Kk k k k k k k K k k k k k k k k K k k k k k k k k K K Kk k k k k XK 


for (i =0; i < 10; itt) 
{ for (k = 0; k < 3; k++) so1l[i][k] = O; 
Tor (J 0; J < 10; j++) R[i]l jt+] = 0; 
anc[i] = z[i] = D[i] = M[i] = S[i] = sw[i] = P[i] = ul[i] = 
L[i] = O; ) 


K k k k k k k k k k k k k k Kk K k k k k k k k k k K k k k k k k K k k k Kk k k k k k k k K k k k k k k k K k k k k k K‏ لو و 


// * 

E/ * MAIN MENU ROUTINE 

II KKKKXKXKKKKKKKKKKKXKXKKKKKKKKKKKKKKKKKKKKKKKKKKKKXKKKKKKKKKKXKKKKKKK 

M: 

clrscr(); 

cout << "Nn" 

Ec "At 

«« pt 

Ec "At Design of Soldier Pile and Lagging 

Ec "At In Accordance with NAVFAC DM-7 

«« BE 

س7 ا ج" >> 

cout << "\n\n\t\t\t MAIN MEN U\n\n" 

cout << "\t\t 1. Enter Soil Properties and E 803 
<< "\t\t 2. Read Data From an Existing File\n" 





<< "\t\t 3. Edit Input Data\n" 

<< "\t\t 4. Save Input Data\n" 

<< "\t\t 5. Execute Wall Analysis\n" 

<< "\t\t 6. Execute Anchor\\Wale Analysis\n" 
<< "\t\t 7. Save Analysis in an Output File\n" 
<< "\t\t 8. Exit Program\n\n" 


<< "\t\t\t Your Choice? -- "; 
while ((i = atoi(gets(cc))) <=0 ١١ i >=9) { 
cout << "\n\t\t" << ce << " is an incorrect response, try again." 
<< anla ; 
eout << "\t\t\t Your Choice? == ٠١ } 
switch (i) { 
case 1: input(); bp - 1; break; 
case 2: read data(); bp = 1; break; 
case 3: if (bp) view data(); 
else { clrser(); 
cout << "\n\n\n\tERROR - You must input or read data before you 
edit them!" << "\n\t Press the enter key to return to the 
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main menu. la”; 
gets(cc); } 
break; 
case 4: if (bp) save_data(); 
else { clrscr(); 
cout << "\n\n\n\tERROR - You must input or read data before you 
save them!” << "\n\t Press the enter key to return to 
the main menu. \a"; 
Bets(cc); } 
break; 
case 5: if (bp) { analysis(); bp = 2;} 
else { clrscr(); 
cout << "\n\n\n\tERROR - You must input or read data before 
analysis!" << "\n\t Press the enter key to return to the 
main menu, Val: 
gets(cc); } 
break; 
case 6: if ((bp > 1) && (numa > 0)) anchor(); 
if (numa == 0) ( clrscr(); 
cout << "\n\n\n\t There are no anchors in the wall data, 
therefore” << "\n\t anchor analysis is not required." << 
E\n\n\t Press the enter key to return to the main menu.\a"; 
Bets(cc); | 
if (bp <= 1) { elrser(); 
cout << "\n\n\n\tERROR - You must accomplish wall analysis before 
this analysis!" << "\n\t Press the enter key to return 
to the main menu. Na”; 
gets(cc); |) 
break; 
case 7: if (bp > 1) save(); 
else { clrscr(); 
cout << "\n\n\n ERROR - You must accomplish wall analysis before 
you can save the data!" << "in Press the enter to 
return to the main menu.\a"; 
Bets(ce); | 
break; 


/ * oe ee ہار‎ k k K k k k k k k £ k £ eoe k k k k k k eoe oe X k k k k k k k k k k k k k k k k £ k k k k k k k k k k k k k x x K 


// * EXIT ROUTINE 
[| [RR RRR RIK KR KR KI KKK RR KR KK IK KK KKK KKK KK KK KKK KR KKK KKK KKK KK KK KKK KK KK 


case 8: cout << "\n\t Are you sure you want to quit the program? 
WIN) =, 

do { gets(cc); 

c = toupper(cc[0]); 


ME (e == 'y') !! (c == 'N*)) break; 

cout << "AnitThat's not Yes or No, please enter a Y or N. -- \a"; 
iile ((c t= 'Y') (1 (c != 'N')); } 

if (c == 'Y') { 
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elrser(); 

cout << "1+ ۳۶ R O G R À M T E R MII "NA TE Din ; 
exit(0); ) 

goto M; ) 


D k k k k K k k k k k k k K K k k k K k k K k k k k k k k k k k k k k k k k Kk K k k x k k K K K k K K k K k K K k k K k k k K 


INPUT FUNCTION‏ ص1۱ 


// * Enter program variables for calculations. 
[| kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkx 


void input (void) { 

eilrscr(): 

cout << "\n\t\t\tWall Properties\n\n"; 

cout << "\n\tEnter the Engineer's name. -- ''; 

gets(engineer); 

cout << "\n\tEnter the project name. -- "; 

gets(project); 

cout << "\n\tEnter the date. -- "; 

gets(date); 

cout << "\n\tEnter the elevation of the top of the excavation in 
feet. -- "; 

cin >> telev; 

cout << "\n\tEnter the final elevation of the bottom of the 

excavation. -- "; 

cin >> belev; 

if (belev >= telev) 

{ cout << "\nERROR - The bottom of the excavation must be below 
Phe top!" << "Nn Reenter the final elevation of the 
excavation. -- la"; 

cin >> belev; } 

cout << "\n\tEnter the number of anchors that are to be used to 
support the" << "\n\t excavation for a maximum of ten anchors. 

tt. 

cin >> numa; 

if (numa) { 

cout << "\n\tEnter from the top to bottom the elevation in feet 
of the anchor(s).\n"; 

hh = telev; 

j = O; 

for (1 = 0; 1 < numa; ++1) ( 

cin >> anc[j]; 


while (anc{j] >= hh }} anc[j] <= belev) 

{ cout << "\n\tERROR - The elevation of this anchor must be below 
the prior anchor or" << "\n\t the top of the excavation 
and above the bottom of the excavation." << "init Reenter 
the elevation of this anchor. -- \a"; 


cin >> anc[j]; } 
ES anc[j]; ++]; } } 
cout << "\n\tEnter the spacing of the soldier piles. -- "; 


EE 





cin >> s; 

elrscr(); 

cout << ۰٦ Propertiesinin”; 

cout << "\n\tEnter the number of soil SE for a maximum of ten 


layers. -- ; 
cin >> nums; 
cout << "\n\tEnter the soil type, either 1 for sands or 2 for 


clays. -- "; 

cin >> soil_type; 

Bhile ((soil_type <= 0) ii (soil_type >= 3)) {. 

cout << "\n\n\tERROR - The soil type must be either 1 (sands) or 
E clays).Na" «« "AnNt Please reenter soil type. -- ٠ 


| cin »» soil type; ) 


Elrscr(); 


if (soil type -- 1) 


cout «« "\n\n\tEnter the soil layering properties as follows from 
top down:\n" << "\n\tElevation of the top of the soil layer in 
feet from top down.” << "\n\tMoist or saturated unit weight of 
the soil (kips/ft^3)." «« "\n\tFriction angle (degrees)." << 
"\n\t(The entry should read like: 100 .115 35)" << 
"\n\n\tNOTE: The top of the excavation is at elevation " << 
telev << " feet.\n"; } 

else { 

cout << "\n\n\tDo you wish to perform a total or effective stress 
analysis?"; 

cout << "\n\n\tI£ you would like to accomplish a TOTAL STRESS 
ANALYSIS enter" << "\n\t the saturated unit weight of the soil 
above and below the" << "init ground water table."; 

cout << "\n\n\tI£ you would like to accomplish an EFFECTIVE 
STRESS ANALYSIS" << "\n\t enter the satuarted unit weight of the 
soil above the water" << "\n\t table and the buoyant unit weight 
of the soil below the water" << "\n\t table. The water table 
elevation should be located above the" << "\n\t bottom of the 


put. 
cout << "\n\n\tEnter ] for a total stress analysis and 2 for an 
effective" << "\n\t stress analysis. -- "; 
cin >> str_anal; 
while ((str_anal <= 0) ¡! (str anal >= 3)) ( 
cout << "\n\tERROR - Please enter either a 1 (total) or 2 
(effective). --\a"; 


ı cin >> str_anal; } 


Elrscr(): 

cout << "\n\tEnter the soil layering properties as follows from 
top down:" << "\n\tElevation of the top of the soil layer in 
feet from top down." << "\n\tSaturated or buoyant unit weight of 
the soil (kips/ft*3)." << "\n\tUndrained shear strength (ksf)." 
<< "\n\t(The entry should read like: 100 .115 1.5)" << 
"\n\n\tNOTE: The top of the excavation is at elevation " << 
telev << " feet.\n"; } 
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O; 
nums; ++i) { 
OJ ee 

UMeCsoil | OO) l= teley)) 


E- 1210: j 
mor (i = 0; i 
En >> scil[j] 
Mile ((soil1[3][0] > hh) 
Ef (soilfj][0] ? hh) 


ma A H 


But << "\nERROR - " << “An The elevation of the top of the 
soil layer must be below the last layer." << "\n Reenter 
all the soil data for this layer. -- \a" 

if (soil[0][0] != telev) 

sout << "\nERROR - The first layer must extend to the top of the 
excavation" << "\n Reenter all the soil data for this 
layer. -- Xa”; 


ES ^ so11f3]E0] ^^ soilfj][1] >> soil[j][2]; ) 

mM = soil[j][0]; ++3; } 

merscr(); 

cout «« "\n\tEnter the elevation of the water table in feet. -- 


Sin >> gwt; 
¿hile (gwt > telev) { 


cout << "\n\nERROR - "F" << "Nn The location of the water table can 
not be above the top of the excavation." << "in Reenter the 
location of the water table. -- la"; 

zin >> gut; ) 

ihile ((str anal == 2) && (gwt < belev)) { 

cout «« "An ERROR - The location of the ground water table must 
be above the bottom" << "An of the excavation for an 
effective stress analysis." << "\n\n Reenter the location 
of the water table. -- la"; 


Mn >> gwt; 

-out << "\n\tEnter the slope of the ground behind the wall in 
degrees. -- "; 

En >> b; 

sout << D Enter the surcharge load (ksf)." «« "\n\tPlease 
enter O if none. -- "; 

En >> g; 

zout << “\n\tEnter the data for any strip load:” << "\n\t 
Surcharge load (ksf), width of strip load (ft)," << "\n\t and 
the distance the strip load is from the wall (ft)."; cout << 
"\n\tPlease enter 0's if none. -- "; 

tin >> qs[0] >> qs[1] >> qs[(2]; 

MWrscr(); ) 


"2 X X K K K x Xx k k k x k k k k x k k x k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k K kx k k k k xk x Xx 


E * READ DATA FUNCTION 


// * Read data from a existing DOS file to enter variables. 
/ / پل بل لالا‎ e ke k ke e باو بل بو بر بل‎ ke با با ما پا باو پا پا ار ہار‎ ok با باو‎ AR RAR 
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void read data(void) ( 
char *cx = "ABORT"; 


\elrscr(); 
Bout << "\n\n\n\tEnter filename. -- "; 


gets(filename); 


WILE *ffp; 
while ((ffp=fopen(filename,"r"))==NULL) { 
İprintf("NnERROR - Trouble opening %s -- read mode.la”, 


filename); 


¡cout << "ininReenter the filename or type ABORT to return to the 


... 


main menu. -- i 


¡gets(filename); 
'j = strlen(filename); 
Mor (1 = 0; i < 3; i++) £filename[i] = toupper(filename[i]); 


if (stremp(filename, cx) == 0) break; } 


‘if (stremp(filename, cx) != 0) { 


fgets(engineer, 60, ffp); 


fgets(project, 60, ffp); 
| fgets(date, 30, ffp); 
| fscanf(ffp, "Mn %£ \n %£ \n SÉ in 3d", &telev, &belev, ۹۷ 


&numa ) ; 

for (1 = 0; 1 < numa; ++i) 

Merscant(ffp, "\n SET, &anclil); ) 

fscanf(ffp, "Mn %£ Ain 3d in %d In $d'", &gwt, &nums, &soil_type, 
&str_anal); 


| 
| 


Efor (i = 0; i < nums; ++i) 
Meescanft(ffip, “An St St SET &soil[i][O], &soil[i][1], 
&soil[i][2]);) 
fscanf(ffp, "Nn ۹۶ دا‎ ۷۶ An BE BE BE", &b, &q, &qs[O], &as[1], 
Msqs[2]): 
fclose(ffp); 
cout<< "\n\tPlease reenter: Engineer's name. -- "; 
gets(engineer); 
Bout «« "Nt Project title. -- ''; 
gets(project); 
Bout «« "t Date. -- "١ 


gets(date); 
cout << "\n\tData read, press enter key to continue."; 
Mes tec); | } 


y / Kk k k k k k k k k k k k K k k k k xA k k k k k k k k k K X k x x k K k x Kk Xx Ax x x ار‎ x پار‎ kx x kx xx xXx از لل لا لا لا لا لا لا لا لا‎ 


Ki * VIEW AND EDIT ENTERED DATA FUNCTION 


// * View and edit entered program variables. 
|| kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkx 


void view_data(void) 1 


WALL: elrser(); 
cout << "\n\t\tWALL PROPERTIE S\n"; 
printf ("\n\tl. Engineer: %s", engineer); 
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»rintf E nto. “Project: er project); 
Meintf (“\n\t3. Date: %s",date); 


sout << "\n\t4. The elevation of the top of the excavation is " 
<< telev << " feet." << "\n\t5. The elevation of the 
bottom of the excavation is " << belev << " feet." << "XnXt6. 


"t . Ü, 
$ 7 


‘The number of anchors is << numa << 


Lf (numa) ( 


Sout << "\n\n\t The anchors are located as follows:\n" << 
ı"\t\tAnchor" << "\tElevation (feet)\n"; 

| 0; 

mor (i = 0; i < numa; tti) 

Baprintf("NtNVt ۹۴۰ %5,2f£Nn”, ++j; añne[i]);)) 

Sout << "XnXt7. The spacing of the soldier piles is " << s << " 
|feet."; 

cout << "\n\n\tDo you want to change any values? (Y/N) -- "; 


do { gets(cc); 

E toupper(ccf0]); 

(ce == 'Y') !! (e -- 'N')) break; 
else { 

Bout << “\n\t" << ce << " is an incorrect response, try again -- 


Na"; ) O) while (c !2'N'); 


ME (c -- 'N') { SOIL: 927 

Meat << "\n\t\ts OIL PROPERTIES" 

cout << "\n\n\t8. The elevation of the water table is " «« gut 
<< " feet." << "\n\t9. The soil properties are as follow:\n" 
u "\n\t Soil Type Elev Unit Wt Friction 
Angle" “cnt Cohesion”; 

Jj = O; 

for (i = 0; i < nums; ++1) ( 

Sut << "\n\t کو‎ 

Lf (soil type == 1) cout << "sand"; 

else cout << "clay"; 

printf )" $7.2f ٤ 1.4۶ Kop 
ESSIEOJIO], soilfj]f1], soill[3]1[21):; 

et; } 


cout << "XnXnXt10. The slope of the ground behind the wall is 
<< b << " degrees."; 

lcout << “\n\tll. The surcharge load is " << q << " ksf."; 

Iprintf ("\n\t12. The strip load is %7.2f ksf, %4.2f feet wide,", 


qs[0], qs[(1]); 


Brint£f("\n\t and located %5.1f feet from the wall.", 
as[2]); 
cout << "\n\n\n\tDo you want to change any values? (Y/N) -- "; 


do { gets(cc); 
c - toupper(cc[0]); 


Er ((c == 'N') !! (e == 'Y')) break; 

else ( | 

cout << “\n\t" << ce << " is an incorrect response, try again -- 
Ba"; >) ) while (c !z'Y'); i} 
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kkkkkkkkxkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkxkxkkxkxx*x 


EDIT DATA ROUTINE 


پر راب را بر ې ار جلا جلا رې اا كلا جلا ار پو پر و پر از پر لا پا چا جلا ار پل پل لا kk‏ پا oko kk‏ پر پر ار پر پر پر پر پر پو د پد پد د د 


nm. 


1 d | 
an incorrect response.\a'; 


) 


i >= 


ve 


Engineer's name -- "; 
project name. -- "; 


date. -- "; 


elevation of the top of the 


elevation of the bottom of the 


* 
x 

* Edit program variables. 
x 


Er (c == "sg? 


cout << "\n\tEnter the number of what you want to change -- 


while ((i = atoi(gets(cc))) <= 
NE out << "Vn Nt" << co << "is 


2 


41 
E/ 
| // 
// 


— e 








meout << “XnXtYour choice? -- |; 
Eclrscr(); 


switch (i) { 


case 1: cout << "\n\tEnter the 
gets(engineer); 
break; 

case 2: cout << "\n\tEnter the 


gets(project); 


— . 


break; 

ease 3: cout << "\n\tEnter the 
gets(date); 
break; 
case 4: cout << "\n\tEnter the 


excavation in feet. -- \n"; 


cin >> telev; 


soil[0][0] = telev; 

break; 

case 5: cout << "\n\tEnter the 
excavation in feet. -- "; 

cin >> belev; 

break; 

case 6: 


cout << "\n\tEnter the number of anchors that are to be used. -- 
f. 


, 
cin >> numa; 


cout << "\n\tEnter from the top to bottom the elevation in feet 


anc[j] <= belev) { 


Hh = 0; 

if (numa != 0) 

j =0;‏ تج 

of the anchor(s) --\n"; 
for (12 0; 1 « numa; ++1) 
{ cin >> anc{j]; 

hh = telev; 


while (anc{j] >= hh 


cout << "\n\tERROR- The elevation of this anchor must be below 


the top of the excavation 


the prior anchor or" << "\n\t 


and above the bottom of the excavation." << "\n\n\tReenter the 


Br va 
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elevation of this anchor. 
cin >> anc[j}; ) 
hh = anc[jl; ++3; ) ) 





break; 

case 7: | | ` 

cout << "\n\tEnter the spacing of the soldier piles. -- ; 

cin >> s; 

clrscrí(); 

break; 

¡case 8: cout << "\n\n\tEnter the elevation to the water table in 
feet. -- "; 

‚cin >> gwt; 








if (gwt > telev) ( | 
cout << "\nERROR - " << "Ain The location of the water table can 
not be above the top of the excavation.'" << "in Reenter the 
Eocation of the water table -- Na"; 
lcin >> gwt; ) 
| break; 


LE 


case 9: cout << "\n\tEnter the number of soil layers. -- "١ 
cin >> nums; 
cout << "\n\tEnter the soil type, either 1 for sands or 2 for 


clays. -- ١ 
Ei: >> soil_type; 
“hile ((soil_type <= 0) |! (soil_type >= 3)) { 
cout << “"\n\tERROR - The soil type must be either 1 (sands) or 2 
Melays). << mt Please reenter soil type. -- \a"; 
| cin »» soil type; |) 
| if (soil type == 2) ) 
¡cout << "AnitDo you wish to perform a total or effective stress 
| analysis?" << "\n\tEnter 1 for a total stress analysis and 
| 2 for an effective" << "\n\t stress analysis. -- "; 
| cin >> str anal; 
while ((str_anal <= 0) || (str.anal >= 3)) 
cout << "\n\tERROR - Please enter either al (total) or 2 
| (effective). --\a": cin >> str_anal; } } 
cout << "\n\tEnter the soil layer's properties:" << 


“"\n\tElevation of top of the layer, unit weight, and friction 
angle" << "\n\t or undrained shear strength.\n"; 
I hh = 1E8; j = 0; 
Eer (1 = 0; l1 > nums; **1) { 
Mein >> soil[3]1[(0) >> soilf[3]1[1] >> soil[(3][2]; 
a CS 


١ while ((soil[j][0O] > hh) oil[0][0] != telev)) 

{ i£ (soil[j][0] > hh) 

Bout << "\nERROR - ™ << “\n The elevation of the top of the 
soil layer must be below the last layer." << "An Reenter 
all the soil data for this layer. -- \a"; 

if (soil[0O][O] != telev) 

cout << "\nERROR - The first layer must extend to the top of the 
excavation" << "Nn Reenter all the soil data for this 
layer. -- Na"; 





Pin >> soil(j][0] >> soi1l[3](1] >> soil[3](2): ) 
hh = soil[j][0); ++j: ) 
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break; 

case 10: cout << "\n\tEnter the slope of the ground behind the 
wall in degrees. -- "; 

Bin >> b; 

break; 

Mase 11: cout << "\n\tEnter the surcharge load. (pst) << 
"\n\n\t\tPlease enter 0 if none. -- "; 

tin >> q; 

break; 

case 12: 

mit << “nXtEnter the data for any strip load:" << "\n\t 
Surcharge load (ksf), length of strip load (ft)," << “\n\t and 
the distance the strip load is from the wall (ft)."; 

cout << "\n\tPlease enter 0 if none. -- "; 

Bin >> qs[0] >> as[1] >> as[2]; 

break; } 

Elrscrí(); 

me (i < 8) goto WALL; 
else goto SOIL; } } 


k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k x k k k k k k k k k k k k k k 


E/ * 

p/ * SAVE DATA FUNCTION 

// * Save entered data into a DOS file. 

a k A AA A < k k k x k k k k K k k k k k k k k k k k k k k k k k K k k k k k k k k k k k k K k k k k k k k k k k k k k k 


void save_data(void) { 


PILE *fp; 

Elrscr(); 

cout << "AnWMtEnter filename to save the data, "; 

gets(filename); 

while ((fp=fopení(filename,"r'")) != NULL) í 

cout << "\n\tThe file already exits, do you want to overwrite it? 
BN) -- Na; 

gets(cc); 


ce = toupper(cc[0]); 
Ewitch (c) ( 


Base 'Y': break; 

case 'N': cout << "\n\tReenter the filename. -- "; 

gets(filename); 

break; 

default 

cout << "\n\t" << cc << " is an incorrect response, try again. 
E. Na"; 

gets(cc); 

c = toupper(cc[0]); } 

wwe © == Y') [ cC = 'x': break; |) } 


fp - fopen(filename, "w*"); 
Meprintf(fp, "%s", engineer); 
Bbrintf(fp, "Xn $s", project); 
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Berintf£(fp, "An $s", 
Eprintf(fp, "\n sf", 
fprintf(fp, “\n SÉ, 17 
Iprintf(fp, "Nn sf", 

11 1:۳1) ٤۶5٣, "۱١۸١ td”, 

۱1 SOS numa; ++3) fprintf(tp, "An $£", ancl3]): 
Morintt(fp, "In 8f", gwt); 

Bprinttí(tp, "in 3d”, nums); 

mr ntr tp, “An *d", soil type); 

fprintf(fp, "Xn %d”, str anal); 

For (i = 0: 1 > nums; ++1) 

1 11۱٢۱ "Nn tf SE SEIT, solil[li][0], soil[i][(1], soil[i]12]); 
w rinti(ip, “\n SE, b); 

Berintf(fp, "\n SET, q); 

Bn intf(fp, “An $£ SE 3£", asl0], qs[1], qs[2]); 

fclose(fp); 

cout << "\n\tData saved, press enter key to return the main 
menu. '' ; 
gets(cc); 
clrscr(); ) 


y / k k K K k K K K Kk K k k K K K k k k K k k k k k k k k k k k k k K k k k k k k k k k k K K K k K K k k k k k k k k k k k k Kk 


X ANALYSIS FUNCTION 

* Determine soil type, call subfunction to accomplish 
+ 

x 


calculations, and display results from analysis. 
K K K K k K k K k k k k K k k K K k k K K k k K k k K k k k k K k k K K K K k k k k K k K k k k k k K K k k K K k k k k k 


/ / 
K/ 
// 
// 
void analysis(void) ( 

Erscr(); 

// Enter Width of Pile, Factor of Safety, & Excav. Depth 

cout << "\n\n\tEnter the estimated width of the flange of the 


soldier pile." << "\n\t (Enter O for default setting of 1 
foot.) -- "; 
cin >> bf; 

if (bf < 0) 

{ cout << "\n\tERROR - Width must be positive, Reenter width ۔۔‎ 
Na"; 


Ein >> bf;) 
WE (DÉ == 0) bf = 1; 
cout << "\n\n\tEnter the factor of safety for the passive 


pressure." << "\n\t(Enter O for DM-7 recommendation of 1.5.) 
PTS ey, 
tin >> fs; 
me (fs < 0) 
{ cout << "\nERROR - Factor of safety must be positive, Reenter 
F.S. -- Na"; : 


Bin >> fs; |} 
ME (fs == 0) fs = 1.5: 
if (numa) ( 
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Pee nn e‏ نت 





cout << "\n\n\tEnter the depth in feet below the anchor location 
Phat is to " << "\n\t excavated prior to installing the 


anchor. -- " ; 


cin >> w; ) 


vr 


Melrscr(); 
Www an \n\n\t\t\tC ALCULATING "; 


NI (soil type == 1) sand _analysis(); 
Br (soil type == 2) clay_analysis(); 


w (z[0] >= 0) { i = 1l, j = 0; 


Elrscr(); 

cout << "\n\n\tRESULTS:" << "AnXAnNEEstimated width of the soldier 
pile rs " «« bf «« " feet.”; 

cout << "\n\tFactor of Safety for passive resistance is " << fs 
<< دک‎ 

cout << "\n\tThe wall was excavated " << w << " feet below the 
proposed anchor location."; 


Bout << "\n\n\t STAGE ZERO MAXIMUM SECTION EMBEDMENT 
REACTION(S)" C 7 SHEAR MOMENT MODULUS 
DEPTH" cec nt CEE) (k-ft) (im 3) 

(ft) (kips)" << '"\n\t ----------------------------- 
Eerintf( "\n\t %d Se Lt $6.2f %6.2£ %6.1f 

--—-", 1, z[i-1], M[i-1], S[i-1], D[i-1]); 

mor (i = 2; i <= numa + 1; ++i) { 
۲۰۰(0) ۶۳۴ص۹“‎ %d Se Lt %6.2f %6.2f Se LE Rl = 


56.22", 1, 2]1-1[, M[i-1]; S[1-1], D[i-1], R[0][j]); 

Bor (k = 2; k <= numa; ++k) { 

Pr (RIK-1][31) ( 

Fout >> \n\t\t\t\t\t\t\t EE een, e 

۲۷٣6.207 R[K-1][j]); ) ) ++3: |‏ ج5 

printf("\n\nNOTE: Stage l moment based on Kiewit criteria is 
Se LE kip-ft.", Mk[0]); 

if (numa > 0) { 


Brintf(' An Stage 2 moment based on Kiewit criteria is %6.1f 
kip-ft", Mk[1]); 
۲۴1)" and reaction force is %6.1f kips.", Rk); } 


if (numa > 1) printf("XnNOTE: Minimum depth of embedment based 
on maximum moment is $3.1f feet.", Dmin); 

Ef ((D[numa] « 6) i! (Dmin < 6)) { 

cout << "AnNOTE: NYCTA recommends minimum penetration depth of 
six feet."; ) } 


if ((soil_type == 2) &S (str anal == 1)) 
printf ("\nNOTE: A total stress analysis approach was used."); 
if ((soil_type == 2) && (str anal -- 2)) 


printf ("XnNOTE: An effective stress analysis approach was 
used."); 

cout << "\n\nPress the enter key to return to the main menu. د"‎ 
mets(cc); | 
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| 


| 

| 

| 

II پو بپ یوی ې یرپ پر پر پ پر پر پو پر پو پو پو پا پر پو پو پو پو پا پا پو پر پا پا پا با ٭ لل‎ KC OX لد چو چو‎ AAA AA 
y * SAND ANALYSIS FUNCTION 


// * Execute analysis for sands 
II kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkěkkkkkkkkkkkkkkkkkkkkk*xxx 


| 
void sand_analysis(void) { 


| 


// * k k k جلا از‎ k پار‎ k k k k k k k k k K k k k k k k K k k K k k k k k k k k k k k k k k k k k k K k k k k k k k k K k k k X X 


| * STAGE I - SAND 
ff III یر پر رو پر پر پر بر ر پو پو پر پر پر پر جلا يلا پا پر پر پر پر پر پر پو پو پو پو پر پر پر پو پا پا پو پو پر پر پر پر پر پر پر پو پر پا پا‎ 
| 


E= O; 1 دت‎ 0; v = 0; y = 0; 
if (numa) hh = anc[j] - w; 
else hh = belev; 
ka_kp(); 
strip(); 
hh = telev - hh; 
sigh = Ka*wt*hh*s*hh/2; // Horizontal Stress due to Soil 
sigs = Ka*qe*s*hh; // Horizontal Stress due to Surcharge 
pp = (3*Kp/fs-Kab)*bf*wtb; 
2 [0] = 0; /* Zero Shear */ 
m= 0; 
while 
(sigh + sigs + Kab*(wt*hh+qe)*bf*z[0] - pp*z[0]*z[0]/2 + u > 0) 
E z[0] = z[0] + 0.05; 
1f (gwt >= (telev - hh )) u = 0.0312*b£f*(3%*Kp/£fs-Kab)*z[0]*z[0]; 


else u = 0; 
if ( (gut > telev - hh - z[0]) && (gwt « telev - hh) ) 
Ez[0] = 0; 


while (sigh + sigs + Kab*(wt*hh*qe)*bf*z[0] - pp*z[0]*z[0]/2 + 
-0.0312*bf*(3*Kp/fs-Kab)*(z[0]-telev+hh+gwt)*(z[0]-telev+hh+gwt) 


> 0) z[0] = z[0] + 0.05; } 

v = z[0]; /* Calculate Maximum Moment */ if 
(gwt <= (telev - hh - z[0])) u = 0; 

¡else 


{ if (gwt >= telev - hh) كا‎ 0.0104*bf*(3*Kp/fs-Kab)*v*v*v; 
else u = 0.0104*bf*(3*Kp/fs-Kab)*pow((v-televthhtgwt),3); } 
M[0] = sigh*(hh/3+v)+ sigs*(hh/2+v)+ Kab*bf*(hh*wt+ge)*v*v/2- 
'pp*v*v*v/6+ u; 


sto = M[0]/2.4; /* Calculate Section Modulus */ 
"70; /* Calculate Depth of Embedment */ 
u= 0; 

while (sigh*(hh/3*v)*sigs*(hh/2*v)*Kab*bf*(wt*hh*qe)*v*v/2- 
| pp*v*v*v/6tu » 0) ( v m ھ۹9۹٦‎ 


if (gwt >= (telev - hh )) u = 0.0104*bf*(3*Kp/f£s-Kab)*v*v*v; 
else u = 0; 

if ((gwt » telev - hh - v) && (gwt < telev - hh) ) { v=0; 

while (sigh*(hh/3*v)* sigs*(hh/2*v)* Kab*bf*(hh*wt*qe)*v*v/2- 
pp*bf*v*v*v/6 + 0.0104*bf*(3*Kp/fs-Kab)*pow((v-telev+hh+gwt),3) 
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) Ve =: 0:09, } 


V, 

hh + z[0]; dk | 
/ Calculate Moment based on Kiewit Analysis 
Mk(0] د‎ Ka*qe*hh*s*(hh/2*2) tKa*wt*hh*hh*s*(hh/3*2)/2; Dmin - 7; 


= 
"tt. 


pout << “\n\n\t\t Se ie bile CMO mM Es ere Da ; 


| < 0 
‚D[0] 
iz[0] 
1 


| 
E / K K K x x k k x k k k k k k k k k k K k k k k k k k K X K k k K k k k k k k K k k k k k k k k k k k k k k k k k k x k x k k 


E/ * STAGE II = SANDS 
JJ #« # از چا كلا جلا باو ار باو بل بل بب ٭ ٭ او او ٭ ا ٭ ٭ ٭ ٭ ٭ ٭ ٭ ٭٭‎ k ار یلو‎ I جلا ملا بلا بلا يلا جلا جلا جلا ملا ملا لا علا‎ k k k k k kkk k k k kk k 


| 


lif (numa) { ++i; 


I = 1; v = O; y = O; 

lif (numa == 1) hh = belev; 

| else hh = anc[j] - w; 

ka_kp(); 

Berip(); 

hh = telev - hh; 

| sigh = Ka*wt*s*hh*hh/2; /* Horizontal Stress due to Soil 
| */ sigs = Ka*qe*s*hh; /* Horizontal Stress due to 
mer charge */ pp - (3*Kp/fs-Kab)*wtb*bf; 

Ev - O; 


u = 0; 

while (sigh + sigs + Kab*(hh*wtt+qe)*bf*v - pp*v*v/2 + u> 0) í 

Y <= v + 0.05; 

if (gwt >= (telev - hh )) u = 0.0312*bf*(3*Kp/£s-Kab)*v*v; 

else u= 0; ) 

if ( (gwt > telev - hh - v) && (gwt < telev - hh) ) 

mor = OF; u = 0; 

while (sigh + sigs + Kab*(hh*wt+qe)*bf*v - pp*v*v/2 + 

0.0312*bf*(3*Kp/fs-Kab)*(v-telev*hh*gwt)*(v-telev*hh*gwt) > 0) 
v = v + 0.05; ) 


m _ 


/* Reaction Force */ 

if (gwt <= (telev - hh - v)) ( u = O; ) 

else 

{ if (gwt >= telev - hh) { u = 0.0104*bf*(3*Kp/fs-Kab)*v*v*v; ) 

else { u = 0.0104*bf£*(3*Kp/fs-Kab)*pow((v-telev+hh+gwt),3); } } 

R[0][0] = (sigh*(hh/3+v)+ sigs*(hh/2+v)+ Kab*(wt*hh+ge)*bf*v*v/2 
- pp*v*v*v/6 * u) / (hh*anc[0]-telev*v); 

vy = 0; u= 0; /* Zero Shear */ 

while (R[0][0] - sigh - sigs - Kab*(wt*hh*qe)*bf*v * pp*v*v*bf/2 
- u « O ) (v5 v + 0.05; | 

1f (gwt >= (telev - hh )) u= 0.0312*bf*(3*Kp/fs-Kab)*v*v; 

else u= 0; 

if ( (gwt > telev - hh - v) && (gwt < telev - hh) ( 4 ين‎ = O; 

while ( R{[O][0] - sigh - sigs - Kab*(wt*hh+gqe)*b£*v + pp*v*vx*bf£/2 
- 0.0312*bf*(3*Kp/fs-Kab)*(v-telev+hh+gwt)*(v-telev+hh+gwt) < 0) 

| v = v + 0.05; 

EE-[1] = v: 


s‏ = " سح تت کې 


—. = 


سل س س 
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| 


ie (gwt <= (telev - hh - v)) [ u = 0; ) // Maximum Moment 
else 
Mr ot >- telev - hh) u 5 0O.0104*bE*(3*Kp/fs-Kab)*v*v*v; 
Welse u = 0.0104*bf*(3*Kp/£s-Kab)*pow((v-telev+rhhtgwt) ,3); } 
MOE] = sigh*(hh/3+z[1]) * sigs*(hh/2*z[1]) + 
MlKab*(wuwt*hhtqe)*bf*z[1]*z[1]/2 - pp*z[1]*z(1]*z[1]/6$ - 
R[0][0]*(hh-telev+tanc[O]+z[1]) + u; S[1] = M[1]/2.4; 
|// Section Modulus 
Bll] = 0; u = O; /* Depth of Embedment */ 
while (M[1] - Ka*(gqge+t(telev-anc[0])*wt)*pow((hh- 
telev+tanc[0]),2)*s/2 - s*Ka*wt*pow((hh-telev+anc[0]),3)/3 - 
| b£*Kab* (qe+hh*wt)*D[1]*(D[(1]/2+hh-telev+anc[0]) + 
! pp*D[1]*D[1]/2*(2*p[1]/3*hh-telev*anc[O0]) - u « O ) 
Em Dil] = DÍ1] + 0.05; 
if (gwt >= (telev - hh )) 
ME 0.0312*bf*(3*Kp/fs-Kab)*D(1]*D[1]*(2*D[1]/3+hh-telev+anc[0]):; 
else u = 0; } 
mt ((gwt > telev - hh - D(1]) && (gwt < telev - hh) ) { D[1] = O; 
while ( M[1] - Ka*(qe*(telev-anc[0])*wt)*pow((hh - 
televtanc[0]),2)*s/2 - s*Ka*wt*pow((hh-telev*tanc[0]),3)/3 
* pp*D[1]*D[1]/2*bf*(hh-telev*anc[0]*2*D[1]/3) - 
bf*Kab*(qe*hh*wt)*D[1]*(D[1]/2*hh-telev*anc[0]) - 
0.0312*bf*(3*Kp/fs-Kab)*pow((D[1]-telev+hh+gwt),2)* 
(D[1]*hh-telev*anc[O]-(D[1]-telev*hh*gwt)/3) > 0) 


[1] = D[1] + 0.05; ) 
z[1] = 2[1] + hh; 
/ / Calculate Moment & Reaction based on 


| 

| Kiewit y = hh-televtanc[0]; 
Mk[1] = Ka*s*y*y*(qe+rwt/2*(hh+telev-anc[0])]))/9; 

Rk = Ka*qe*s*(telev-anc[0]) + Ka*wt*s*pow((telev-anc[0])])),2)/2 + 
(Ka*s*y*y/2*(qetut*(telev-anc[0])) * y*y*y*Ka*s*wt/6)/y; 
cout << "\n\t\t STAGE 2 COMPLETED. ";) 


y / Kk k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k 


E// * STAGE III = SANDS 
١ پا پا پا با پا كاد علا علا ع لا لا /ر/‎ kc بل باو باو باو باو تار با‎ k k k kk k چا پا‎ k باو پا با‎ k k k باو باو جار باو جار باو لا‎ k k k k kk k k k k k kk kkk k 


= 2; 
while (j <= numa) ( 
VU =0; y = 0; /* Average Unit Wt & Fricion 


Angle */ if (3 < numa) hh = anc[j] - w; 

| else hh = belev; 

ka_kp(); 

strip(); 

sigs = Ka * ge; /* Horizontal Stress due to Surcharge */ 
Sigh = 0.65 * Ka * wt * (telev - hh); 

/* Horizontal Stress due to Soil */ 

CS O 76517057120) 

0; k < 3; ++k) /* Calculate Reaction Forces */ 


for (i 
for (k 
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Mme if (k < j - 1) H = anc[k+1]: 
else H = hh; 


v = 0; 

meme ae <= رر مع پر‎ vy - R[i=l1][)=1] * (anc[i-1] = H) + g; 
. [j )] -* (pow((telev-H),2)*(sigh*sigs)*s/2 - v) / (anc[k]-H); 
l i = 0; 


// Calculate point of Zero Shear 


luv = R(0O][3-1]: 


| 
| 


و مه وسم پو د - 


while (v - (telev - anc[lil) * (sigh + sigs) * s > 0 ) 
My = R[++i][j-1] + v; 

E == 3 - 1) break; | 

|| = v / ((sigh + sigs) * s); 

v = 0; /* Calculate Maximum Moment */ 
i = 0; M(j] = 0; 

while (telev - anc[i] < z[3]) 

fey = R(i][j-1] * (z[j] - telev + anc(i]); 


1 7 
ıM[j] = M(j]) + v; 
1f (1 == j) break; } 
u M[jJ] - (sigh + sigs) * s * 2(3] * 2[3] / 2; 
8) (ژ‎ 2 ۱87 


/* Calculate Depth of Embedment */ 
L = M[j]; min_D(); D(j] = y: 


if (j == numa) { Mmax = M[0]; 

for (i = 1; i <= numa; it+) if (M{i] > Mmax) Mmax = M[i]J; 

v - Mmax; min_D(); Dmin = y; } 

ttj; 

Bout << "\n\t\t SST و اہم‎ ee ES OO MM PLETED Y; 

) ) 

/ | لالا لل‎ AA A AAA ا تا‎ 
// * CLAY ANALYSIS FUNCTION 

// * Execute analysis for clays. 

II RR A AAA KA 


void clay_analysis(void) { 
fa = 0; j = 0; 


E / K K k k K K x x Xx < k k k K K < k k k K X k Kk k k k K x K k k k K عاد عاد جد عاد‎ XK لا‎ XK ہار از لا پار‎ KK KK kk Ck ok kk ok 


p/ * STAGE 1 > CLAYS 
Il Coke oko ek باو باو باو از ټاو باو‎ KC باو‎ KC OC باو باو‎ Ok باو با باو جلا جلا بلا جلا ار جلا جلا جلا جلا جلا جلا بلدا جلا جلا‎ KC Dk DK KC DK O با باج باج باو بلا جا بلا‎ KC DK KC ار باج باج باج پر‎ 


if (numa) hh = anc[0] - w; 
else hh = belev; 
float hhh = telev - hh; 


wt_c_cb(); /* Calculate Average unit wt, c, and c base */ 
ECrrp(); 9 
zt - (2*ca-qe)/wt; /* Depth of Tension Zone  */ 


lf ((6/fs*cb+2*cb-qe-wt*(telev-hh) < 0)) 


88 





( v = (6*cb/fst2*cb-qe)/wt ; 
Erintf("\a\n\n\nERROR - Soil will not support the wall below a 
depth of &4.2f feet.", v); 
BED] s -i: goto 0: ( 
Nt ((hh »- telev - zt) && (zt >= 0)) 
Wed 0; z(0) - 0; S[0] = 0; D[0O] = O; ) 
E (bh < telev - zt) && (zt >= 0)) ( 


sigh » s*(wt*hhh*qe-2*ca)*(hhh-zt)/2; /* Active Pressure */ 
pp = (6*cb/fs+2*cb-wt*hhh-qe)*bf; // Result. Resistance Press. 
z[0] sigh / pp; /* Zero Shear */ 


Ee 2t)/3*z[0]) ^ pp*z[0o]*z[0]/2; // Max. Moment 
/* Depth of Embedment  */ 


M[0] 
00 


] 
while ا نس‎ ih zt)/3+D[0])-pp*D[(0]*D[0]/2 > 0) DLO] = Do] + 


50.05; 

ELO] = z[0] + hhh; } 

me ( zt < 0) { 

pp = (6*cb/fs*2*cb-wt*hhh-qe)*bf /* Resultant Resist Pres */ 
z[0] = ((qe-2*ca)*hhh*s + wt*hhh*hhh/2*s) / pp; /* Zero Shear */ 

// Max. Moment 

M[0] = (ge-2*ca)*hhh*s*(hhh/2+z[0])+wt*hhh*hhh/2*s*(hhh/3+z[0]) 
gP*2[0]*z[0]/2; 

Do] = O; /* Depth of Embedment  */ 

while (s*(qe-2*ca)*hhh*(hhh/2*D[0]) * wt*hhh*hhh/2*s*(hhh/3*D[0]) 
- pp*D[0]*D[0]/2 > 0) D[0] = D[O] + 0.05: 


z[0] = z[0] + hhh; } 
s[0] = M[0]/2.4; 
vf Kiewit Analysis 


Mk[0] E , 

if (zt > 0) Mk[0)] = s*wt*hhh*hhh/2*(hhh/3+2) + 
s*(qe-2*ca)*hhh*(hhh/2+2); 

WE ((zt >= 0) && (zt « hhh)) 

Mk[O] = s*(wt*hhh+tge-2*%ca) * (hhh-zt)/2 * ((hhh-zt)/3+2); 

Dmin = 7; Kp = zt; 

// Set zt, stage 1 equal to Kp to compare to zt, stage 2 
Bout << "\n\n\t\t ST A G E 1 C OM P LE LED 


7 k جا‎ K k k k k k k k k k Kk k K k k k K k K k K k k k k k k k k k k k k k k k k K k k k k k k k k k k k k k k k k k K k k k k 


bc 5۲۸۷۶ 175‏ 
پچ زا A AA‏ چا باج باو چا بج ماد باج باج با باو باج باج باو با باو با پا باو با پا باو باو با پا باو بل با بل باو پر باو با با با بابلا با با بابلا با لا للا f f‏ 


if (numa) { 


5 = l; 

1f (numa == 1) hh = belev; 
else hh = anc[1] - w; 

E cC eb(); 

strip(); 


zt - (2*ca-qe)/wt; 
me (zt > Kp) zt = Kp; 
hhh = telev-hh; 
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if ((6/fs*cb*2*cb-qe-wt*(telev-hh) < 0)) 

(v 2 (6*cb/fs*2*cb-qe)/wt; 

printf("\a\n\n\nERROR - Soil will not support the wall below a 
depth of %4.2f feet.", v); 


NETO] = -1; goto Q; } 


0)) 
O SUNE O EO OT 


D 2[1] = 0; R[0][0] 
Mc[1] = 0; ) 
if ((hh < telev - zt) && (zt >= 0)) ( 
hh = telev - hh; 
Sigh = s*(wt*hh*qe-2*ca)*(hh-zt)/2; 
pp = EE C n R8 


if ((hh > telev - zt) && (zt » 
|. (. M[1] 


See 


my = sigh / p /* Zero Earth Forces */ 


R[0][0] = Ge 2t)/3+v) - pp*v*v/2) / (hh-telev*anc(0]*v); 

EET] s (sigh - R[OJ][O]) / pp; /* Zero Shear  */ 

M[(1] » sigh*((hh-zt)/3*z[1]) - ppr*z[1]*z[1]/2 - R[0][0]*(hh 
-telev+anc[0]+z[1]); D[(1] = O; 

if (anc[0] > telev-zt) { 

while (M[1] + pp*D[1]*(D[1]/2+hh-telev+tanc[0]) - sigh * 
(hh*anc[0]-telev-(hh-zt)/3) « 0) 

D[1] * D[1] * 0.05; ) 

else ( 

while (M[1] * pp*D[1]*(D[1]/2*hh-telev-*anc[0]) - 
s*(qe-2*catwt*(telev-anc[0]))* pow((hh-telev*anc[0]),2)/2 - 
s*wt*pow((hh-telev*anc[0]),3)/3 « 0) 

p[1] = D[1] + 0.05; 

z[1] = z[1] + hh; ) 

if (zt « 0) ( hh = telev - hh; 

pp = (6*cb/fs+2*cb-wt*hh-qe)*bf; 

sigh = s*wt*hh*hh/2; 

sigs = s*(qe-2*ca)*hh; 
SSM Tt Sigs) / pp; 

RLOJ(0) = (sigh*(hh/3+v) + sigs*(hh/2+v) - pp*v*v/2) / (hh 
-telev*anc[0]*v); 

z[1] = (sigh + sigs - R[O][O]) / pp; 

M[1] = sigh*(hh/3+z[1]) + sigs*(hh/2+z[1]) - pp*z[1]*z[(1]/2 - 
R[0][0]*(hh-telev+tanc[O]+z[1]): 

D[1] = O; 

while (M[1] * pp*D[1]*(D[1]/2-*hh-telev*anc[0]) - 
s*(qe-2*ca+wt*(telev-anc[0])) * pow((hh-telev+tanc[0]),2)/2 - 
s*wt*pow((hh-telev+anc[0]),3)/3 < 0) D[1] = D[1] + 0.05; 

z[1] + hh; } 

M[1]/2.4; 


N 
ہے‎ 
- 
بے‎ 

Hs 


hhh-zt; // Kiewit Analysis 

telev - anc(0]; 

hhh-telev+tanc[0]; 

Mk[1] = Rk = 0; 

if (zt < 0) { Mk[1] - s*yX*y*(qe - 2*ca + wt*v * wt*y/2)/9; 


په 
hn n H‏ 
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Rk = s*(qe-2*ca)*v + s*wt*v*v/2 + 
s*((qe-2*catwt*v)*y/2+wt*y*y/6); ) 

me (((zt >= 0) ئک‎ (zt >= y)) && (ot 2گ‎ 1 

ME[1] = s*y*y/9 * (qe- 2*ca+twt*hhh)*H/(2*y); 


Rk = s*(wt*hhhtqe-2*ca) *H*H/(6*y); } 

me ((zt >=0) && (zt « y)) { 

WEI] = s*y*y/9 * (qe - 2*ca + wt*y + wt*y/2); 

Rk = ات‎ 2*catwt*v)*(v-zt)/2 * (qe-2*ca*twt*v)*y/2 * wt*y*y/6); 
Mecout << “\n\t\t A Ge aç ole be 70٦ ER 


y / K K K k K k k k k k k k k k k k k k k k X K X X X X k X K K X K K K X K X K RO XO K k K K K X K K K K K K K K K K X K 
¿E STAGE III CLAYS 


a هم‎ 


wa 


— 


| // k k k k k k K k k K k k k k k k k X k k k k k k k k k k £ k k k k k k k k k k k k k k k k k k k k k k k K k k k k k k k k K 


if (numa > 1) { 

B= 2; 

while (j <= numa) { 

double a, h; 

if (j > numa) hh = anc[j] - w; 

else hh = belev; 

BE c cb(); 

Errip(); 

if ((6/fs*cbt2*cb-ge-wt*(telev-hh) < 0)) 
( v = (6*cb/£s*2*cb-qe)/wt; 
printf("NalnininERROR - Soil will not support the wall below a 
depth of %4.2f feet.", v); 


HN) - -1; goto Q; ) 

float Ns = wt*(telev-hh)/ca; /* Stability Number */ 
FOr (i = O; i < 10; i++) R[i][j-1] = O; 

tor (k = 0; k < 3; k++) 

WE (k < j - 1) H = anc[k+1]; 

else H = hh; 

h = telev - hh; 

a = telev - H; 

v = O; 


Nr RE > H) u = 0.0104*pow((gwt-H),3)*s; 

else u = 0; 

for (i = 1 
(Ns <= 6) 
( if (a « h/4) sigh = 1.6*wt*pow(a,3)/6; 

if ((a >= h/4) 88 (a <= 3*h/4)) 

Sigh = 0.05*wt*h*h*(a-h/6) + 0.2*wt*h*pow((a-h/4),2); 

if (a > 3*h/4) sigh = wt*pow(h,2)*(0.05*(a-h/6) + 0.2*(a-h/2)) 
+ 0.4*wt*pow((a-.75*h),2)*(h-2*a/3); ) 

if (Ns > 6) 

{ Ka = 1 - 4*ca/(wt*h); 

if (a < h/4) sigh - 2*Ka*wt*a*a*a/3; 

else sigh = Ka*wt*h*h/8*(a-h/6) + Ka*wt*h*pow((a-h/4),2)/2; ) 
R[k][ 3-1] (s*qe*pow((telev-H),2)/2 + s*sigh - v + u) / 


i <= k: it+) v = Rli-1][j-1] * (ancli-1] - H) + v; if 
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و د س un —_ EE‏ 


p: -H); ) 


V /* Calculate point of Zero Shear */ 
a = KR 20 = O; 
for (i = 0; i < numa; itt) v = R{ijJ{j-1] + v; 


if (Ns <= 6) { 
Bhile ( v * 0.05*wt*h*h*s - (qe+0.4*wt*h)*s*z[3] - u > 0) í 


x 
| 
| 


j] = 213] + 0.05; 
Mit (telev - z{j] <= gwt) u = 0.0312*s*pow((z[j]-televtgwt),2); }} 


mi (z[j] > 3*h/4) ( 

while (v- s*qe*z[3] -u - s*(0.25*wt*h*h+ wt*(h-0.8*z[3]) * 
(zZ[j]-0.75*h)) > O) 

MaS 213] * 0.05; 

if (telev-z[j] <= gwt) 

m 0 70312*s*pow((z[3] - telev + gut) ,2); ) ) 

if (Ns > 6) ( 

while ( v + s*Ka*wt*h*h/8 - s*(Ka*wt*h+qe)*z[3] - u > 0) 

Mails z[5] + 0.05; 

if (telev-z[j] <= gwt) u = 0.0312*s*pow((z[j]-televtgwt),2); } } 

VU = 0; /* Calculate Maximum Moment */ 

M[j] = 0; 

Er (1 د‎ 0; 1 < 3: ++1) 

|| تت‎ Riij[j-l] * (z[j] - telev + anc[i]); 

M[3] = M[3] + v; } 

if (Ns <= 6) ( 

if (2[j] <= 3*h/4) sigh = 0.05*wt*h*h*(z[3]-h/6) + 
0.2*wt*h*pow((z[3]-h/4),2); 

else sigh = 0.05*wt*h*h*(z[j]-h/6) + 0.2*wt*h*h*(z[3]-h/2) + 

pou4*wt*pow((z[l1]-.75*h),2)*(h-2*z[3]/3); |) 
else sigh = Ka*wt*h*h/8*(z[3]-h/6) + Ka*wt*h*powu((z[3]-h/4),2)/2; 
if (gwt » telev-z[j]) u = 0.0104*s*pow((z[j]-telev+tgwt), : 


else u = 0; 

M[j] = M3] es all د رلو‎ = Ssıghrs zen, 

EJ] - ME 3I/2.4; 

D J] = 0; /* Calculate Depth of Embedment */ 


Rf (Ns <= 6) { 

if (anc[j-1] >= telev-3%h/4) 

Sigh = 0.4*wt*h*pow((.75*h-televtanc[{j-1]),2)/2 + 
0.05*wt*h*h*(5*h/6-televtanc[{j-1]); 

else sigh - O.8*wt*(h-telev*anc[j-1]) * 
pow((h-telev*anc[j-1]),2)/3; ) 

else sigh = Ka*wt*h*pow((anc[ j-1]-hh),2)/2; 

if (gut »- anc[j-1]) 

u = 0.0312*(gwt-anc[ j-1])*pow((anc[ j-1]-hh),2)*s + 
0.0208*powu((anc[ j-1]-hh),3)*s; 

if ((gwt > hh) 88 (gwt < anc[3-1])) 

u = 0.0312*pow((gwt-hh),2)*(anc[j-1]-hh-(gwt-hh)/3)*s; 

if (gwt <= hh) u = O; 

while (M[3] + (6*cb/fs+2*cb-qe)*#bf*D[3]*(D[3)]/2+(anc[j-1]-hh)) - 
sigh*s - s*qe*pow((anc[j-1]-hh),2)/2 - u « O) 
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= m 1 


— تب‎ ER 





8 SS] + 0.05; 


ttj: 

Bout << "\n\t\t SIVE CECE TES OOM PLETED eae 
lif (numa > 1) { Mmax = M[O]; 
or (i = 1; i <= numa; i++) 


Cif (M[i] > Mmax) Mmax = M[i]; Dmin = 0; 

Mette (Mmax + (6*cb/fs+2*cb-qe)*bi*Dmin* (Dmin/2+(ane[j-2]-hh)) 
| - sigh*s - s*qe*pow((anc[j-2]-hh),2)/2 - u < 0) 

min = Dmin + 0.05; ) Q: i = 0; 

| 
| 
| 


Ed 4 k k k k k k k k k k k k k k k k k k k k k k k k k K k K k K k k k k k k k k k k k k k k k K K K K K K K AAA چا‎ k K X 


Ei « KA KP FUNCTION 
// * Cal. average unit weight, friction angle, and Ka for cut. 


// * Calculate unit weight, friction, Ka, and Kp for base soil. 
(f f kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkxx 


| void ka kp(void) { 
for (k= 0; hh < soil[k+1][0]; ++k) 
( if (k >= (nums-1l)) break; 
۷ soil[k]f1] * (soil[k][0] - soil[k-*1 
solill[k][2] * (soil[k][0] - soil[k+1 
v + soil[k][1] * (soil[k][0] - hh); 
per*solllki|(2|) * (soxl[k][fO] - hh); 
t-v/ (telev - hh); 
a = y / (telev - hh); 
= nums - 1; 
while (hh > ge 709) --]; 
fab = soil[1][2]; 
طط )ہا‎ = soil[1][1]; 
BB = pow(tan((45 + fab/2)*pi/180),2); /* Calculate Ka & Kp */ 
Kab = pow(tan((45 - fab/2)*pi/180),2); 
lif (b == 0) { Ka = pow(tan((45 - fa/2)*pi/180),2); } 
else [ Ka = pow(cos(fa*pi/180),2)/(cosí(fa*pi/270)*pow(l+sqrt 
| (sin(fa*pi/108)*sin((fa*pi/180)/(cos(fa*pi/270) * 
y * MIN_D FUNCTION 


mes(b~pi/ls0))),2)); } } 
/ 
F 
// * Calculate min. embedment depth for stage III of sand excav. 
71 K K k x k x k k k k k K k k K k k k K k k k k k K K k k k k k k k k k k k k k K k k k k k k k k k k Kk k k k k k k k k k k K 


un ١ 
نافا‎ 


— و‎ TC 


x 


| 
| 


/ K k k < k K k K k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k K 


void min_D(void) {u= y= Q0; 
while (v + Kp/fs*1.S*wtb*b£*y*y*(2*y/3-hhtanc[j-1]) 

- (sigh*sigs)*(anc[j-1]-hh)*(anc[j-1]-hh)*s/2 - u < 0) 
í Say + 0.05; 

‚if (gwt >= hh) u = 0.0936*bE*Kp/fs*y*y*(2*y/3-hhtanc[j-1]); 
else u = 0; ) 

1f ((gwt > hh - y) && (gwt < hh) ) { y= 0; 
while (v + Kp/fs*1.5*wtb*bf*yx*xy*(2*y/3-hh+anc[3j-1]) - 
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wi gs) *tanc[j-rlj-hh)*(anc[g-l|]-hh)*s/2 -,0.0936*bi* 
Kp/£s*pow((y-hh+gwt),2)*(y-hh+anc[3-1]-(y+gwt-hh)/3) < 0) 
= y + 0.05; ) 


k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k K k k K k k Kk k k K K k Kk k k k k k k Kk Kk K 


Y 
E * 
Ki * WT_C_CB FUNCTION 

// * Calculate average unit weight and cohesion for cut. 
E * 

E/ * 


Also calculate average cohesion for base soils. 
k k k k k k k k k k k k k k k k k k k k k k k k k k k K k k k k k k k k k k k k k k k k k k k K k k k k Kk k k k k k k k Kk 


Bord wt c cb(void) ( 

Ka - 1; 

v = 0; y= Q0; 

for (k= 0; hh < soil[k+1][0]; ++k) 

if (k >= (nums-1)) break; 

soil[k][1] * (soil[k][0] - soil[k+1][0 
soil[k][2] * (soil[k][0] - soil[k+1][ 0 
v + so1l[k][1] * (soil[k][0] - hh); 

y * soil[k][2] * (soil[k][0] - hh); 

= 1 
t > 


ki Ll.) 


< < < < — 


if (str anal - IM SO 

else ( if ((gw hh) && (j < 2)) u = 0.0624*(gwt-hh); 

else u = 0; 

wt = (v + u) / (telev - hh): 

ca = y / (telev - hh); 

West ij, jk; // Calculate the average cohesion over 20 ft. 
1J = jk = nums-1; 

while (soil[3jk][0] < hh-20) --3k; 

while (soil[ıj][0O] < hh) --ij; 

me (1) == jk) cb = soil[i3][(2]; 


else { y = 0; v = hh; 

while (ij « jk) ( 

E = y - soil(i3+1)[0]; 

Æ = v * soil[i3][(2] + y; 

VU = soil[++ij][0]; } 

Wwe v (20 - hh * soil[ij](0]) * soxr1[i3][2]) / 20; ) ) 


نما نم نما نما نما نما نما نما نما نما نما نما نما نما نما لما نما نما لما لما نما لما نما نما نما نما نما لم لما نما لما نما نما نما نما نما نما نما نما لما نما نما نما دم نما نما نما نما نما لما نما لما لما لما لما لما لما لم لما لما نما 


/ ٣ 
/ * STRIP FUNCTION 

/ * Transform strip load to an equivalent surcharge load and 
E ٣# 

y * 


add to the surcharge load. 
پر لو پر لر لر ار لا لر اا لر ار پر پا ار پا ار او او پا ار او جل ار ہار چاو بو‎ AAA KARA KARA RARA kc kc e ke وب لب بل پو از‎ ak 


تت e Dee‏ سم 


void stripívoid) ( 

double Ol = atan(qs[2]/(telev-hh)); 

double 02 = atan((qs[l]+qs[2])/(telev-hh)); 
ISO] (pr*Ka)*(O2-01) td; } 


هو 


| 





KKK KKK KK KKK KKK KKK KKK KKK KKK KKK KR KKK KK KKK KKK KKK KKK KK KKK KK KKK 


E * 
// * ANCHOR FUNCTION 

// * Perform analysis for wale section modulus, and bonded and 
E * 

E * 


unbonded length for tieback anchor. 
x o oe oe oe oe eoe oe oe o oe oo oo oe HK. KT TH KT x x X Xx Xx جا جلا .جلا ار لر‎ e از‎ xe جلا جلا‎ x ار علا علا .جز ار لر از لا‎ KOK OK OK OKC OK پو عاد علا جلا‎ 


void anchor(void) ( 

clrscr(); 

cout << "\n\tEnter the spacing of the anchors. -- "; 
Fin >> d; 

cout << "\n\n\tEnter the angle of the anchors. -- "; 
cin >> ang; 

cout << "\n\n\tSelect soil type:" 


<< "\n\t Type Soil Description SPT N Value" 
<< "\n\n\t 1 Fine to medium sand 12 - 30" 
c nit 2 Medium to coarse sand 20 لت‎ 
<< "\n\t 3 Sandy Gravel > 45" 
Es KH E 4 Medium Clay 4 - 8" 
<< "\n\t 5 Medium Stiff Clay 9 - 11" 
<< "n\t 6 Stiff Clay | هيار‎ “٦ 
<< "\n\t 7 Stiff to Very Stiff Clay 16 - 20" 
» E 8 Very Stiff Clay 21 - 30" 
<< "\n\t 9 Very Stiff to Hard Clay > 30" 
<< fint"; 
while ((type = atoi(gets(cc))) <= 0 {|} type >= 10) 
{ cout << "\n\t" << ce << " is an incorrect response.\a"; 
cout << "\n\tReenter soil type. -- "; } 
for (1 = 0; i < numa; ++i) /* Cal. Wale Section Modulus */ 
wv - 0; 
for (j = 0; j < numa; ++3) ( if (v < R[i][j]) v = R[i][3j]; ) 
sw[i] = v * d * d / (14.4 * s); 
P[i] = v * d / (s * cos(ang*pi/180)); // Cal. Anchor Length 


switch (type) ( 

case 1: L[i] = pow(10,((P[i]+68.9)/147)); break; 
case 2: L[i] = pow(10,((P[1]+74.5)/182.4)); break; 
case 3: L[i] = pow(10,((P[i]+144.2)/298.2)); break; 
case 4: L[i] = P[i]/3.14; break; 

case 5: L[i] - P[il/4.71; break; 

case 6: L[i] = P[i]/6.28; break; 

case 7: L[i] = P[i]/7.85; break; 

case 8: L[i] = P[i]/9.42; break; 

case 9: L[i] = P[i]/11.0; break; } 


/* Calculate Unbonded BECHER k/ 

ul[il = ((anc[i]-belev)/sin((45 + ang + fa/2)*pi/180)) * sin((45 
- fa/2)*pi/180); 

elrscr{): 

cout << "\n\t OUTPUT FROM WALE AND ANCHOR ANALYSIS\n" 
<< "\n\nSpacing of the anchors is " << d << " feet." << 
"\nThe anchors are set at an angle of " << ang << " degrees." 
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<< "\nThe anchors are set in ; 


switch (type) { | ` 
cout << "fine to medium sand. ; break; 


case 1: 
case 2: cout << "medium to coarse sand."; break; 
case 3: cout «« "sandy gravel."; break; 
case 4: cout << "medium clay."; break; 
case 5: cout << "medium stiff clay."; break; 
case 6: cout << "stiff clay."; break; 
Mase 7: cout << “stiff to very stiff clay."; break; 
case 8: cout << "very stiff clay.": break: | 
case 9: cout << "very stiff to hard clay."; break; } 
printf("\n\n ANCHOR SECTION MODULUS ANCHOR 
ANCHOR UNBONDED"); 
brintf( "Nn ROW OF WALE (in^3) CAPACITY (kips) 
LENGTH (ft) LENGTH (ft)"); 
for (1 = l; 1 <= numa; ++i) ( 
Brintf("\n 8 8 SA Lt SA ot 
SA. Lt $4.1f", i, sw[i-1], P[i-1], L[i-1], 
51]1-11[(: | 
if ((type »-1) && (type <= 3)) 
cout «« "\n\nNOTE: Tieback capacity is based on pressure 
injected anchors using an" <<"\n effective grout pressure 
in excess of 150 psi with a diameter" <<"\n between 4 to 
6 inches and depth of overburden greater than 13 feet."; 
else 
cout << "\n\nNOTE: Tieback capacity is based on post-grouted 
anchors using an effective" <<"\n grout pressure in 


excess of 150 psi with a diameter of six inches."; 
for (i = 0; i > numa; ++i) ( if (ul[i] < 15) ( 
cout << "AninNOTE:  FHWA/RD-82/047 recommends a minimum unbonded 
length of 15 feet."; break; } } 
Bp = 3; 
cout << "\n\n\nPress the enter key to return to the main menu. 


gets(cc); ) 


E / K k k k k k k k k x k k k k k k k k k k k k K k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k K 


y/ * SAVE FUNCTION 


// * Save the results from the various analysis functions. 
II ROI II IOI OOO IOI TOTO TIO TOTTI IK 


void save(void) { 

FILE *xp; 

Erscrí(); 

cout << "\n\tEnter filename to save the data. -- ٠ 
gets(filename); 

while ((xp=fopen(filename,"r")) != NULL) { 

cout << "\n\tThe file already exits, do you want to overwrite it? 


EN) -- Ya"; 
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Mes ica): 

= = toupper(cc[0)); 

Switch (c) { 

case 'Y': break; 

Fase 'N': clrscr(); 

cout << "XnXtReenter the filename. -- "; 
gets(filename); break; 

default 

www < pt << cc << " ıs an incorrect response, try again: 
Na"; 

gets(cc); 

l¢ = toupper(cc[0]); } 

E (c == 'Y') ( c = 'x'; break; ) | 

xp = fopen(filename, "w+"); 

fprintf (xp, "NnNn"); 


wrinti (xp, “At 


kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkxkkxk An); 
fprintf (xp, “At 


x ENN, 
printf (xp, "Nt 

x Design of Soldier Pile and Lagging An. Je 
fprintf (xp, "\t 

x In Accordance with NAVFAC DM-7 AS nm) 


fprintf (xp, "Mt 
* 


Kg now 
Eprintf (xp, "Nt 
KkKKKkkKkKkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk ND); 
fprintf (xp, "Anin1tl. WALL P ROPERT I E S\n"); 
fprintf (xp, "\n\tl. Engineer: %s", engineer); 
fprintf (xp, "\n\t2. Project: %s", project); 
fprintf (xp, "\n\t3. Date: %s", date); 
fprintf (xp, "\n\t4. The elevation of the top of the excavation 
is %4.2f feet.", telev); 
fprintf (xp, "\n\t5. The elevation of the bottom of the 
excavation is %4.2f feet.", belev); 
fprintf (xp, "\n\t6. The number of anchors is %d.", numa); 
1f (numa) í 


printf (xp, "\n\t The anchors are located as follows:\n"); 
fprintf (xp, "\t\tAnchor\tElevation (feet)\n"); 
|1 - 7 


for (i = 0; i < numa; ++i) {fprintf(xp, "At1At %2d\t 
كد‎ cr m, ++], ancli]l); ) ) 
fprintf (xp, "\n\t7. The spacing of the soldier piles is %3.2f 
feet.", s); 
printf (xp, \n\n\n\tIiiI. S O I L PROPERTIES"); 
fprintf (xp, "\n\n\t8. The elevation of the water table is %6.2f 
feet.", gwt); 
fprintf (xp, "\n\t9. The soil properties are as follow:\n"); 
Borintf (xp, "\n\t Soil Type Elev Unit Wt 
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| 








Friction Angle"); 
printf (xp, "\n\t 








| or Cohesion"); J = O; 
Www “O; i < nums; ++i) { 
worintf (xp, "\n\t Dm 
m= (soil type == 1) fprintf (xp, "sand"); 
else fprintf (xp, "clay"); 
fprintf (xp, ' ۹٩7 21 *1-4tf x5 E 
ESDITSTIEO],- soil 3][1], +896111711277 
pt) 


fprintf (xp, "\n\n\tl0O. The slope of the ground behind the wall 
is $&2.2f degrees.', b); 

fprintf (xp, "NnNtl11. The surcharge load is %3.3f ksf.", q); 
ante (xp, \n\tl2. The strip load is %7.2f kst, %4.2f feet 


wide,", qs[0], qs[1]); 


Eprintf (xp, "\n\t and located %5.1f feet from the wall.", 
qs[21); 

Merintf (xp, “\n\n\n\tIII. WALL یی‎ 5 RESUL 
Ds"); 


fprintf (xp, "\n\n\tl3. Estimated width of the soldier pile is 
%3.2£ feet.", bf); 

fprintf (xp, "\n\tl4. Factor of safety for passive resistance is 
NS ITI." , fs); 

fprintf (xp, "\n\t15. The wall was excavated *3.1f feet below 
the proposed anchor location."', w); 


fprintf (xp, "\n\n\tl6. STAGE ZERO MAXIMUM SECTION 

EMBEDMENT REACTION(S)"); 

Bprintf (xp, "\n\t SHEAR MOMENT MODULUS 

DEPTH"); 

Bbrintf (xp, “\n\t (ft) (k-ft) (in 3) (tt) 
ips) ); 

EDrintÉ (xp, "XnXt ———————————————————————————————-————-——-—-—-—-—-—-—-—-- 

Eprintf (xp, "\n\t 1 %6.1f %6. 2f E6 2E %6.1 f 

0 غ‎ 20 M[O], SOI, D[0]); 

p - e 

for (i = 2; i <= numa + 1; ++i) { 

fprintf (xp, "\n\t $d Se Lt %6.2£ %6.2£ %6.1£ 


Rl = 56.22", 1, 2]3-1[, M[i=1], S[i-12], 2]13-1[, 5]0[]3([( : 

for (k = 2; k <= numa; ++k) { 

E (R[k-1][j]) { 

m EE (xp, ‘\n\t\t\t\t\t\t\t R%d = ", k); 

Fporintf (xp, "$6.2£", R[k-1][3j]); } } 

)رخ 

fprintf(xp, “\n\n NOTE: Stage 1 moment based on Kiewit criteria 
is $6.1f kip-ft.", Mk[0]); 

if (numa > 0) ( 

fprintf(xp, "Nn Stage 2 moment based on Kiewit criteria 
is %6.1f kip-ft", Mk[1]); 


98 





Bprintf(xp, “An and reaction force is %6.1f kips.",Rk);} 


if (numa > 1) un 
fprintf (xp, "\n\n NOTE: Minimum depth of embedment based on 


maximum moment is $3.1f feet.", Dmin); 

me ((Dinuma] < 6) ¦¦ (Dmin < 6)) { 

fprintf (xp, "\n\n NOTE: NYCTA recommends minimum penetration 
depth of six feet."); } 

if ((soil_type == 2) && (str_anal == 1)) 

fprintf (xp, "\n\n NOTE: A total stress analysis approach was 
Bsed."); 

teen type == 2) ۵۸8 (str anal -- 2)) 


fprintf (xp, "\n\n NOTE: An effective stress analysis approach 
was used."); 
ME (bp > 2) { 
Borintf (xp, "\n\n\n\tIV’. ANCHOR AN D WALE RES 


UNL TS"); 

fprintf (xp, "\n\n\tl7. Spacing of the anchors is %3.1f feet.", 
d); 

fprintf (xp, "\n\t18. The anchors are set at an angle of %3.1f 
degrees.", ang); 


fprintf (xp, "\n\t19. The anchors are set in "): 
switch (type) ( 


case 1: fprintf (xp, “fine to medium sand."); break; 

case 2: fprintf (xp, “medium to coarse sand."); break; 
case 3: fprintf (xp, "sandy gravel."); break; 

case 4: fprintf (xp, "medium clay."); break; 

case 5: fprintf (xp, "medium stiff clay."); break; 

Base 6: fprintf (xp, "stiff clay."); break; 

base 7: fprintf (xp, "stiff to very stiff clay."); break; 
case 8: fprintf (xp, "very stiff clay."); break; 

case 9: fprintf (xp, '"very stiff to hard clay."); break; ) 


NoEintto(xp, "AnNt20. Xn"); 


fprintf (xp, "in ANCHOR SECTION MODULUS ANCHOR 
ANCHOR UNBONDED") ; 
Eprintf£ (xp, "Nn ROW OF WALE (in’3) CAPACITY (kips) 
LENGTH (ft) LENGTH (ft)"); 
fprintf (xp, "Mn -------------------~---------------------------- 
A — uae mk m ub ms m me کے‎ SER: 
for (i = 1; i <= numa; ++i) { 
fprintf (xp, "An %2d $4.1f %4.0f 
SA. Lt $4.1f", i, sw[i-1], P[i-1], L[i-1], 


Abra) 
Er ( (type >=1) && (type <= 3)) { 

fprintf (xp, "\n\n NOTE: Tieback capacity is based on pressure 
injected anchors using an"); 


Eprintf (xp, dn effective grout pressure in excess of 
150 psi with a diameter"); 
fprintf (xp, en between 4 to 6 inches and depth of 


overburden greater than 13 feet."); ) 
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else 
E. (xp, "\n\n NOTE:  Tieback capacity is based on post 


-grouted anchors using an effective"); 

Eprintf (xp, X grout pressure in excess of 150 psi 
with a diameter of six inches."); ) 

E (1550. 3 < numa) ++i) ( if (ulli] « 15) ( 

fprintf (xp, "\n\n NOTE: FHWA/RD-82/047 recommends a minimum 
unbonded length of 15 feet."); break; ) ) ) 

Pprintf (xp, "NnNnNtNtANAtE N D O F A N A L Y S I S"); 
Berintf (xp, "\n\n'"); 

fclose(xp); 
cout << "\n\tData saved, press the enter key to return to the 


main menu. "; gets(cc); 
7 k k k e ok ooo eoe oe e de e eoe oe ok oe ok ode ooo ooo oe ooo oe ار جار پار‎ A ار‎ KK eoe eoe ox Xo oo ke جلا‎ xx جاو‎ x لر از‎ a kx علا علا لر جلا‎ 


E/ * END OF PROGRAM 
E/ k k k k k kk kk k لر لر لر‎ A A A لر بر بر رز زار ار لر لر لر لر لر لر‎ HK KH ار‎ KK KK KK KK ار ار چا ار جلا علا جلا ار رز از از اس اا ار ار جلا جلا ار ار‎ xxx ل‎ 


) 
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APPENDIX C 


CALCULATIONS AND EQUATIONS 
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پد لد د٤٩3‏ 2 


¿NE BORA MAGS 





X oo ooo ooo k k K k k K k k K k k k k k k k k k K K K k K k K k k k k k K k k k k k k k k K 


x x 
> Design of Soldier Pile and Lagging x 
* In Accordance with NAVFAC DM-7 x 
2 o 


XC K k < K XK K k K k k K k k k k k k k k k k K k k k k k k k k k k k k k k k k k k K k Kk k k k 


WALL FAROE ER ISIE S 


Engineer: D'Amanda 

Project: Sand Example 1 

Date: 21 September 1991 

The elevation of the top of the excavation is 
250.00 feet. 

The elevation of the bottom of the excavation is 
215.00 feet. 

The number of anchors is 3. 

The anchors are located as follows: 


Anchor Elevation (feet) 
1 245.00 
2 235.00 
3 225.00 


The spacing of the soldier piles is 4.00 feet. 


SOIL PIR COME SE Roa ETS 


The elevation of the water table is 0.00 feet. 


The soil properties are as follow: 
Soil Type Elev Unit Wt Friction Angle 
or Cohesion 
sand 250.00 0.1100 30.00 


The slope of the ground behind the wall is 0.00 
degrees. 

The surcharge load is 0.500 ksf. 

The strip load is 5.00 ksf, 20.00 feet long, 
and located 50.0 feet from the wall. 


W ALL ANALYSIS RESULTS 
Estimated width of the soldier pile is 1.00 feet. 
Factor of safety for passive resistance is 1.0. 


The wall was excavated 1.0 feet below the proposed 
anchor location. 
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16. STAGE ZERO MAXIMUM SECTION EMBEDMENT REACTION(S) 


SHEAR MOMENT MODULUS DEE TH 


CEE REEL) (AS) CTE) (kips) 
TIO 73ت‎ ZN GER Ee 
229 39.63 24.84 58 Rİ el 24 
206 71.43 29 6 5.4 Rl, Şİ > 
R2 = 43.68 
sin 73.45 0 07 RI - 66.10 
٢۸ 2451747 
Ro 04758195 


Stage 1 moment based on Kiewit criteria is 43.5 
kip-ft. 

Stage 2 moment based on Kiewit criteria is 44.2 
kip-ft and reaction force is 27.2 kips. 


Minimum depth of embedment based on maximum 
moment is 5.7 feet. 


NYCTA recommends minimum penetration depth of 
six feet. 


ANCHOR AND WALE REIS UL TS 


Spacing of the anchors is 8.0 feet. 
The anchors are set at an angle of 5.0 degrees. 
The anchors are set in medium to coarse sand. 


SECTION MODULUS ANCHOR ANCHOR UNBONDED 
OF WALE CAPACITY LENGTH LENGTH 
(in^3) (kips) (ft) (ft) 
73.4 133 12: 7 16.6 
571 103 9.4 11.0 
65.3 118 11.4 5 5 


Tieback capacity is based on pressure injected 
anchors using an effective grout pressure in 
excess of 150 psi with a diameter between 4 to 6 
inches and depth of overburden greater than 13 
feet. 


FHWA/RD-82/047 recommends a minimum unbonded 
length of 15 feet. 


E N D O F ANALYSIS 
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| 
| = چ٩‎ 
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٢٢ م1۹‎ (o Dieu 
Nez A - Zal (91-91) — G2= TAN (50+2%,,)= 1.485 


Q,: TANİ (59/6) = 1.451 


| qe = Ze En x(1-485-1.45/3 
de> 0.324 KSF App عم رلک‎ (vap +O. SES 


7e * O.824 ESP 


Ponce = Sanu , Paz Kad HYZ <S Van OAI + 676+ 4 


ےا 2.64 = 
4« 6د 0.824 ېر Fa = lc ge Hab" z‏ ك ها صلا عه لک Conce‏ 
E‏ 


[r or Tero maa 
لاۓے‎ ۶0 > Fa + RG + Ka (#H rqe)b£ Z -(3Ke/{s-Ka) bE 
2 LA + 6-A + ¥(o-tleg+0-804) (2) - (sxs- AYo)() wo 
Z=4.95' + 6= 10:95 ii (ve 2-5") 
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WALL ٢۹ ۹٢ 2 و٥‎ R T TE S 


Engineer: 9962 

Project: Sand Example #2 

Date: 21 September 1991 

The elevation of the top of the excavation is 
10.00 feet. 

The elevation of the bottom of the excavation is 
-10.00 feet. 

The number of anchors is 2. 

The anchors are located as follows: 


Anchor Elevation (feet) 
l 5.00 
2 -5.00 


The spacing of the soldier piles is 4.00 feet. 


S O I L ا‎ ICES 


The elevation of the water table is 0.00 feet. 
The soil properties are as follow: 


Soil Type Elev Unit Wt Friction Angle 
or Cohesion 
sand 10.00 0.1100 30.00 
sand 3.00 0.1150 35.00 
sand -4.00 0.1180 38.00 


The slope of the ground behind the wall is 12.50 
degrees. 

The surcharge load is 0.000 ksf. 

The strip load is 0.00 ksf, 0.00 feet long, 

and located 0.0 feet from the wall. 


WALL ANALYSIS RE S/U LTS 
Estimated width of the soldier pile is 1.00 feet. 
Factor of safety for passive resistance is 1.0. 


The wall was excavated 1.0 feet below the proposed 
anchor location. 
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16. STAGE ZERO MAXIMUM SECTION EMBEDMENT REACTION(S) 
SHEAR MOMENT MODULUS DEPTH 


CEC) EZEL) (iñ 3) (ft) (kips) 
1 10,9 32-35 13.69 a e 
2 23.6 43:25 18.02 6.6 Rl = 23.56 
3 115 Jo 32 5.14 3.8 Rl = 44.37 
R2 = 24,65 
NOTE: Stage l moment based on Kiewit criteria is 25.2 
kip- ft. 


Stage 2 moment based on Kiewit criteria is 44.3 
kip-ft and reaction force is 18.9 kips. 


NOTE: Minimum depth of embedment based on maximum 
moment is 1.7 feet. 


J NOTE: NYCTA recommends minimum penetration depth of 
d six feet. 
| 


IV. ANCHOR AND WALE RTECS UNL TS 


17. Spacing of the anchors is 9.0 feet. 





18. The anchors are set at an angle of 10.0 degrees. 
19. The anchors are set in fine to medium sand. 
20. 
ANCHOR SECTION MODULUS ANCHOR ANCHOR UNBONDED 
ROW OF WALE CAPACITY LENGTH LENGTH 
(in^3) (kips) (ft) (ft) 
1 227 7 45 6.0 7.4 
2 15.4 25 4.4 25 


| NOTE: Tieback capacity is based on pressure injected 

| anchors using an effective grout pressure in 
excess of 150 psi with a diameter between 4 to 6 
inches and depth of overburden greater than 13 
feet. 


NOTE: FHWA/RD-82/047 recommends a minimum unbonded 
length of 15 feet. 


END O F ANALYSIS 
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WALL BRE PEK) ES 


Engineer: D'Amanda 

Project: Clay Example #1 

Date: 21 September 1991 

The elevation of the top of the excavation is 
100.00 feet. 

The elevation of the bottom of the excavation is 
60.00 feet. 

The number of anchors is 3. 

The anchors are located as follows: 


Anchor Elevation (feet) 
1 90.00 
2 80.00 
3 70.00 


The spacing of the soldier piles is 5.00 feet. 


O ESR O P E R Pat es 


The elevation of the water table is 0.00 feet. 
The soil properties are as follow: 


Soil Type Elev Unit Wt Friction Angle 
or Cohesion 
clay 100.00 0.1100 0.50 
clay 85.00 0.1200 E 


The slope of the ground behind the wall is O 
degrees. 

The surcharge load is 0.750 ksf. 

The strip load is 5.00 ksf, 10.00 feet long, 
and located 50.0 feet from the wall. 


WALL ANALYSIS ۲ ۰65 
Estimated width of the soldier pile is 1.00 feet. 
Factor of safety for passive resistance is 1.0. 


The wall was excavated 1.0 feet below the proposed 
anchor location. 
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16. STAGE ZERO MAXIMUM SECTION EMBEDMENT  REACTION(S) 


SHEAR MOMENT MODULUS DEPTH 


length of 15 feet. 
E ND OF ANALYSIS 
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(ft) (k-ft) (in 3) (fr) (kips) 
1 13.6 119.23 49.69 1.5 === 
2 24.3 91.14 37.98 ۱ھ‎ Rl = 44.13 
3 2 5 1350,38 62.66 Dae Rl = 194.47 
R2 = 80.75 
4 34.7 123.01 51.25 1 1 RI = 21111 
R 2.2 5103, 88 
R3 = 128.81 
NOTE: Stage 1 moment based on Kiewit criteria is 137.1 
kip-ft. 
Stage 2 moment based on Kiewit criteria is 65.8 
kip-ft and reaction force is 29.1 kips. 
NOTE: Minimum depth of embedment based on maximum 
moment is 1.9 feet. 
NOTE: NYCTA recommends minimum penetration depth of 
six feet. 
NOTE: A total stress analysis approach was used. 
Ju U A N CH OR A N D WALE RESULTS 
17 Spacing of the anchors is 5.0 feet. 
18 The anchors are set at an angle of 7.5 degrees. 
19. The anchors are set in stiff to very stiff clay. 
20. 
ANCHOR SECTION MODULUS ANCHOR ANCHOR UNBONDED 
ROW OF WALE CAPACITY LENGTH LENGTH 
(in 3) (kips) (ft) (ft) 
1 735983 213 DU 26.7 
2 35.8 104 13.3 17.8 
3 44.7 130 16.5 8.9 
NOTE: Tieback capacity is based on post-grouted 
anchors using an effective grout pressure in 
excess of 150 psi with a diameter of six 
inches. 
NOTE:  FHWA/RD-82/047 recommends a minimum unbonded 
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WALL EE AE Ee 


Engineer: D'Amanda 

Project: Clay Example 2 

Date: 21 September 1991 

The elevation of the top of the excavation is 
1637.00 feet. 

The elevation of the bottom of the excavation is 
1614.00 feet. 

The number of anchors is 2. 

The anchors are located as follows: 


Anchor Elevation (feet) 
1 1630.00 
2 1620.00 


The spacing of the soldier piles is 6.00 feet. 


SOIL P ROPERTTE S 


The elevation of the water table is 1637.00 feet. 
The soil properties are as follow: 


Soil Type Elev Unit Wt Friction Angle 
or Cohesion 
clay 1637.0 0.0626 0.75 


The slope of the ground behind the wall is O 
degrees. 

The surcharge load is 0.000 ksf. 

The strip load is 0.00 ksf, 0.00 feet long, 
and located 0.0 feet from the wall. 


WALL ANALYSIS RESULTS 
Estimated width of the soldier pile is 0.75 feet. 
Factor of safety for passive resistance is 1.5. 


The wall was excavated 1.0 feet below the proposed 
anchor location. 
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STAGE ZERO MAXIMUM SECTION EMBEDMENT REACTION(S) 


SHEAR MOMENT MODULUS DEPTH 


16, 


(ft) (k-ft) (in^3) (rt) (kips) 
0.0 0.00 0.00 0.0 په سار‎ 
23-5 539 2.24 51 Rl = 4.26 
200 41.81 17.42 4.4 Rl = 65.60 


Stage l moment based on Klewit criteria is 0.0 
Kip ek: 

Stage 2 moment based on Kiewit criteria is 16.5 
kip-ft and reaction force ıs 2.5 kips. 


Minimum depth of embedment based on maximum 
moment is 4.4 feet. 


NYCTA recommends minimum penetration depth of 
six feet. 


A effective stress analysis approach was used. 
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